Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Wie erreiche ich Objekt, dessen Name in String vorhanden?


Ecthelion - Fr 03.01.03 16:35
Titel: Wie erreiche ich Objekt, dessen Name in String vorhanden?
Also ich will RadioButtons ansteuern, deren Name ich aus "RadioButton" + IntToStr(zahl) ermittle. Die Buttons sind unter diesen Namen da, auch die String-Variable mit dem Namen des anzusprechenden Buttons.

Aber wie komm ich jetz an das Button mit diesem Namen ran? Ich nehm an das geht irgendwie mit umgekehrten Zeigern (@), oder auch nicht.

Danke.


Bayo - Fr 03.01.03 16:50


Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure TForm1.Button1Click(Sender: TObject);
var
  rBtn: TRadioButton;
begin
  rBtn := TRadioButton(FindComponent('RadioButton0'));
  Showmessage(rBtn.Caption);
end;


Grüsse Dominic