可変変数(editのまとめて削除)をするには？

西山浩一 2005-06-12 02:14:27 No: 15565

お世話になります。

下記を実行すると
----------------------------------------------------
procedure TForm1.Button2Click(Sender: TObject);
var
i:integer;
s:string;
begin
for i := 1 to 3 do
begin
s:='edit'+inttostr(i)+'.Clear;';
memo1.lines.add(s);
end;
end;
-------------------------------------------------------
下記のようになりますが、これだと処理として実行出来ません

edit1.Clear;
edit2.Clear;
edit3.Clear;

そこで質問なんですが、ループを使ってEditの内容を消去する方法や
可変変数の使い方というのはどのような方法があるのでしょうか？

kkk 2005-06-12 02:33:15 No: 15566

これって自分で調べてみましたか？
最近、ほとんど調べないでいきなり質問する人おおいですねー。

ということで、
https://www.petitmonte.com/bbs/answers?question_id=152