Hallo,
ich meinte nicht, dass der Formular-Code angepasst werden sollte, sondern etwas in der Art:
Delphi-Quellcode:
procedure TRadioGroupSpecial.ButtonClick(Sender: TObject);
var TForm: frm;
begin
frm := (Sender as TRadioGroupSpecial).ParentForm;
if frm.Active then
begin
// erst jetzt kommen die gewünschten Maßnahmen
end;
end;
So kann es noch nicht klappen: Ich erinnere mich nicht mehr, wie ich auf die Schnelle das Container-Formular zu einer Komponente erhalte; und ich weiß auch nicht, was zuerst kommt: der unerwünschte Click oder Form.Active. Aber in dieser Richtung kannst Du ausprobieren.
Viel Erfolg! Jürgen