スポンサーサイト

--------

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

EnumerateControls

2009-07-16

procedure EnumerateControls(parentControl: TWinControl; proc: TProc); //aion rmt
var //AION ネザカン RMT
CheckArgumentNotNull(parentControl, 'parentControl'); //AION アイオン RMT
for i := 0 to list.Count - 1 do //AION シエル RMT
begin
proc(TWinControl(list[i]));
end;
finally
list.Free;
end;
end;
スポンサーサイト

トラックバック

コメントの投稿

非公開コメント

カテゴリ
最新記事
最新コメント
最新トラックバック
検索フォーム
ブロとも申請フォーム

この人とブロともになる

QRコード
QRコード
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。