ソースを簡略化させるためには

解決


うま  2004-11-10 17:53:27  No: 11724  IP: 192.*.*.*

お世話になっています。
Delphiの書式がわかりません。

例えばパネル1〜9のキャプションに名称をセットしたい場合、
下記のような感じで書けないのでしょうか。

ちなみに下記のものはpanel[i]部でコンパイルエラーになります。

For i:=1 to 9 do
begin
  panel[i].Caption := 'パネル' + IntToStr(i);
end;

ACCESSにはあるのでDelphiでもできるのではといろいろやってみましたが
できませんでした。
どなたかご教授お願いします。

編集 削除
@っしー  2004-11-10 18:17:10  No: 11725  IP: 192.*.*.*

※過去ログ等を漁ればいくらでも回答は得られるのですが、、、

For i:=1 to 9 do
begin
  try
    TPanel(FindComponent('panel' + IntToStr(I))).Caption := 'パネル' + IntToStr(I);
  except
    ShowMessage('パネル' + IntToStr(I) + ' <- そんなパネルないよ!');
  end;
end;

で、どうでしょ?

編集 削除
うま  2004-11-10 19:59:57  No: 11726  IP: 192.*.*.*

@っしー 様
レスありがとうございます。

>※過去ログ等を漁ればいくらでも回答は得られるのですが、、、
おっしゃるとおりです。すみません m(_ _)m

うまくいきました。ありがとうございました。

編集 削除