Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - RadioGroup Buttons mit komponenten verbinden
AlexanderAcker - Mo 21.10.02 01:07
Titel: RadioGroup Buttons mit komponenten verbinden
Also wenn ich in RadioGroup über Item die Buttons eingefügt habe will ich ich das 1.Button z.B. mit einen Edit feld verbinden und das 2.Button soll die Farbe des RadioGroup Fensters ändern. Wie mach ich das nun???
Kann mir bitte einer helfen :)
Delete - Mo 21.10.02 08:27
RadioGroup?
Ist das nicht dieses "Panel" mit den eingebauten Radiobuttons?
Ich verstehe zwar den Sinn deines Vorhabens nicht so ganz -das muss ich ja aber auch nicht!- deswegen mein Tipp: schau dir die Eigenschaft "ItemIndex" an.
Am besten in Verbindung mit dem "OnClick"-Ereignis. Damit hast du eine Kontrollmöglichkeit, wann der Anwender in das Ding geklickt oder den Status anderweitig verändert hat. Und über "ItemIndex" bekommst du heraus, welcher Radiobutton ausgewählt ist.
Die Delphi-Hilfe (F1) bietet dazu bessere Erklärungen.
AlexanderAcker - Mo 21.10.02 18:00
Ich dachte mehr an sowas :
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| procedure TForm1.RadioGroupClick(Sender: TObject);
begin
a:=StrToFloat(EditA.text);
b:=StrToFloat(EditB.Text);
If Items.selected.Caption:='addieren' then
EditE.text:=FloatToStr(a+b);
GroupBox1.Color:=clred;
end; |
Ich weis nur nich wie ich die einzelnen Items ansprechen soll ???
LCS - Mo 21.10.02 18:15
Hi
die Items der Radiogroup sind vom Typ TStrings. Also kannst du sie auch genauso ansprechen.
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| procedure TForm1.RadioGroupClick(Sender: TObject);
begin
a:=StrToFloat(EditA.text);
b:=StrToFloat(EditB.Text);
If RadioGroup.Items[0].Checked then
EditE.text:=FloatToStr(a+b);
...
end; |
Oder Besser
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| procedure TForm1.RadioGroupClick(Sender: TObject);
begin
case RadioGroup.ItemIndex of
0: TuDies
1: TuJenes
2: Machwasduwillst;
end;
end; |
Gruss Lothar
AlexanderAcker - Mo 21.10.02 18:57
@ LCS
Vielen Dank !!! :D :D :D
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!