摘要：
//显示窗体中所有控件的函数 function GetCtrls(Control: TWinControl; List: TStringList): Boolean; var i: Integer; obj: TWinControl; begin for i := 0 to Control.ControlCount-1 do begin obj := TWinContro... 阅读全文
posted @ 2008-01-13 21:04
万一
阅读(6099)
评论(16)
推荐(0)
浙公网安备 33010602011771号