滔 Roy

摘要： Delphi 判断线程TThread是否释放 //返回值：0-已释放；1-正在运行；2-已终止但未释放； //3-未建立或不存在 function CheckThreadFreed(aThread: TThread): Byte; var i: DWord; IsQuit: Boolean; beg 阅读全文

摘要： Delphi 和键盘有关的API函数(Keyboard Input) ActivateKeyboardLayout //设置调用线程或当前进程的输入区域设置标识符（以前称为键盘布局句柄）。输入区域设置标识符指定区域设置以及键盘的物理布局。 BlockInput //阻止键盘和鼠标输入事件到达应用程序 阅读全文

摘要： Delphi System单元-Odd- 判断是否是奇数 原型： function Odd(X：Integer): boolean; Delphi示例: var i: Integer; b: Boolean; begin i := 1; b := Odd(i); {是奇数返回真} ShowMessa 阅读全文

摘要： Delphi 键盘API GetKeyState、GetAsyncKeyState -获取键盘 / 按键值key的状态 1、GetKeyState 作用：检索指定虚拟密钥的状态。状态指定该键是向上、向下还是切换（每次按该键时交替打开、关闭）。 原型： SHORT GetKeyState( int n 阅读全文