RadioGroup ItemIndex OnClick Probelm

[Joergie]

Hallo,
ich habe 2 RadioGroups mit Events-OnClick

Delphi-Quellcode:

procedure RadioGroup1.OnClick();
begin
  ...
  RadioGroup2.ItemIndex := 2;
end;


procedure RadioGroup2.OnClick();
begin
  ...
  RadioGroup1.ItemIndex := 2;
end;

Dies verusacht eine Endlosschleife, weil wenn ich den ItemIndex einer RadioGroup neu setze, auch wieder das OnClick Ereignis aufgerufen wird.

Was kann ich machen, damit dies nicht passiert?

~joerg