Einzelnen Beitrag anzeigen

uwewo

Registriert seit: 14. Jul 2004
Ort: Karlsruhe
479 Beiträge
 
Delphi 2006 Professional
 
#9

Re: Checkboxen zurücksetzen?

  Alt 2. Okt 2007, 07:00
Hier noch eine Möglichkeit, allerdings nur wenn Du alle CheckBoxen ändern willst.

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
Var i : Integer;
    c : TObject;
begin
  for i := 0 to ComponentCount-1 do
    begin
      c := Components[i];
      if (c is TCheckBox) then (c as TCheckBox).Checked := False;
    end;
end;
Uwe
  Mit Zitat antworten Zitat