Autor Beitrag
AlexanderAcker
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Mo 21.10.02 01:07 
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 :)
MathiasSimmack
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: 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 Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Mo 21.10.02 18:00 
Ich dachte mehr an sowas :
ausblenden 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
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 1305
Erhaltene Danke: 1

WIN 7, WIN 8
Delphi XE5, Delphi XE, Delphi 2007
BeitragVerfasst: Mo 21.10.02 18:15 
Hi
die Items der Radiogroup sind vom Typ TStrings. Also kannst du sie auch genauso ansprechen.

ausblenden 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
ausblenden 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

_________________
Der BH ist für die Brust, der Plan ist für'n Ar...
AlexanderAcker Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Mo 21.10.02 18:57 
@ LCS
Vielen Dank !!! :D :D :D