同一コントロール名をループでまわすには？

解決

かえるっち 2004-06-22 01:25:02 No: 9556

またまた、お願いします。
同じ名前の１０個のテキストボックスに値を入れたいのですが、
ループでできるのでしょうか？
テキストボックスの名前は、
txtName1、txtName2、...txtName9、txtName10
というように番号がふってあります。
よろしくお願いします。

＠っしー 2004-06-22 01:42:55 No: 9557

FindComponentを使います。

for i:=1 to 10 do
begin
TEdit(FindComponent('txtName' + IntToStr(i))).Text := IntToStr(i);
end;

かえるっち 2004-06-22 02:20:08 No: 9558

ありがとうございました。
解決しました。