本文整理自网络,侵删。
function IsDigit(ch: char): boolean;begin Result := ch in ['0'..'9'];end;
相关阅读 >>
Delphi controls 属性与继承 tshape 类的小练习
Delphi下cpu getcpuid实现(x86和x64)
Delphi serial number of an usb flash drive 获取u盘硬件序列号
Delphi ado 连接 excel (附excel各个版本的版本号)
更多相关阅读请进入《Delphi》频道 >>