大悟还俗

邮箱 key_ok@qq.com 我的收集 http://pan.baidu.com/share/home?uk=1177427271
  新随笔  :: 联系 :: 订阅 订阅  :: 管理

2012年4月28日

摘要:var i:Integer;begin for i:=0 to componentcount-1 do begin if (components[i] is TEDIT) then begin TEDIT(components[i]).text:=''; end; end; end; 阅读全文

posted @ 2012-04-28 11:21 大悟还俗_2 阅读(144) 评论(0) 推荐(0) 编辑