在Delphi下使用WinIO读取键盘的端口,模拟操作键盘