Warum Fehler?

[Knotti2005]

Hallo,

warum bekomme ich bei diesen Code

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if checkbox1.Checked:= true and checkbox2.Checked:= true
  then dxbutton1.Enabled:= true
  else
   dxbutton1.Caption:= 'Fehler!!';
end;

end.

Einen Fehler nämlich...

[Fehler] Unit1.pas(84): Operator ist auf diesen Operandentyp nicht anwendbar

Die Checkboxen werden aktiviert indem man 2 Dateien öffnet...

So in etwa..

Delphi-Quellcode:

procedure TForm1.SpeedButton3Click(Sender: TObject);
begin
  if OpenDialog2.Execute then
      Checkbox2.Checked:= true
    else
      checkbox2.Checked:= false;
end;

:gruebel: :gruebel:

[Luckie]

Es fehlen die Klammer. Und bitte gib deinem Thread ein aussagekräftiges Topic.

[Aenogym]

Zitat:

Zitat von Luckie

Es fehlen die Klammer. Und bitte gib deinem Thread ein aussagekräftiges Topic.

weiterer fehler:
bei einer if-abfrage dürfen nur normale gleichheitszeichen (=) verwendet werden. er verwendet aber den zuweisungsoperator ":="

aenogym

[Knotti2005]

Bitte welche Klammern ??? Wenn ich statt := nur = hinschreibe funktioniert die ganze Sache ja nicht mehr... Dann ist der Button aktiviert egal ob kreuzchen da oder nicht...

[Luckie]

Delphi-Quellcode:

if (checkbox1.Checked = true) and (checkbox2.Checked = true) then

[dfried]

Das ganze sollte so aussehen:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if (checkbox1.Checked = true) and (checkbox2.Checked = true) 
  then dxbutton1.Enabled:= true
  else
   dxbutton1.Caption:= 'Fehler!!';
end;

in dem Fall kannst du es aber auch einfacher machen und folgendes schreiben:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if checkbox1.Checked and checkbox2.Checked 
  then dxbutton1.Enabled:= true
  else
   dxbutton1.Caption:= 'Fehler!!';
end;

Edit: Wo war der rote Kasten?!?