本文整理自网络,侵删。
if Edit1.GetTextLen > 0 then begin Caption:=IntToStr(Edit1.GetTextLen); end;
相关阅读 >>
Delphi 用 getenvironmentvariable 获取常用系统环境变量
Delphi 获取随机字符串的方法 getrandomstring
Delphi socket connect timeout 套字节链接超时设置
Delphi 利用datasnap进行数据流(tstream)的传递
Delphi getprocessisadmin()判断exe是否以管理员身份启动
更多相关阅读请进入《Delphi》频道 >>