Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Jürgen Thomas,
8. Feb 2007
Meine Lösungen sind gedacht als Ereignis OnClick einheitlich für alle RadioGroups: beim ersten Vorschlag nur innerhalb eines TabSheets, beim zweiten Vorschlag für das gesamte TabControl.
Nein, ich habe nichts ausprobiert - siehe Signatur. Mein erster Vorschlag kann nicht falsch sein; allenfalls fallen mir Tippfehler bei der Übernahme des Codes ein, und es müssen alle RadioGroups aufgeführt...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Jürgen Thomas,
7. Feb 2007
Ich bin mir nicht sicher, ob ich Dich richtig verstehe. Eine Möglichkeit wäre, einen einheitlichen EventHandler für alle RadioGroups einer TabPage festzulegen:
procedure TabPage1_RadioGroupsClick(Sender: TObject)
begin
button1.visible := (RadioGroup1.ItemIndex >= 0)
and (RadioGroup2.ItemIndex >= 0)
and (RadioGroup3.ItemIndex >= 0);
end;
Das kann noch...