Combobox ItemIndex

[Chris237]

Hey Leute Ich habe ein Problem. Ich glaube der Quelltext sagt alles:

Danke im Vorraus

Chris

Code: Alles auswählen

procedure TForm2.Button1Click(Sender: TObject);
begin
  if ComboBox1.ItemIndex = 0 and ComboBox2.ItemIndex = 0 then
  begin
    Form1.Panel1.Color:=clLime;
  end;                                     

Fehler: unit2.pas(42,44) Error: Incompatible types: got "Boolean" expected "Int64"

[theo]

Klammern fehlen:
if (ComboBox1.ItemIndex = 0) and (ComboBox2.ItemIndex = 0) then