掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
for文で複数のTEDITにテキストを入力するには？ (ID:337)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
尊敬するほどではないです。 僕も勉強になるんで。 今回のことですが、変数名に文字列を足しても、変数名になりません。 FindComponentを使って、コンポーネントの名前から検索します。 var Cnt,MaxCnt : Integer; begin MaxCnt := 100; for Cnt := 0 to MaxCnt do begin (FindComponent('Edit' + IntToStr(Cnt)) As TEdit).Text := ''; // end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.