Image als Bedingung?

[Hellcat]

So hier kommt noch mal die bereinigte Version des Codes...

Delphi-Quellcode:

procedure TForm1.Image1Click(Sender: TObject);
var BitmapO: TBitmap;
begin
    if Image1.picture = schloss zu.bmp then
    begin
      BitmapO := TBitmap.create;
      BitmapO.LoadFromFile('schloss offen.bmp');
      Image1.Picture.LoadfromFile('schloss offen.bmp');
    end
  else
    begin
      BitmapO := TBitmap.create;
      BitmapO.LoadFromFile('schloss zu.bmp');
      Image1.Picture.LoadfromFile('schloss zu.bmp')
    end;
end;

Das Problem ist folgendes: Bei Zeile "if Image1.picture..." kommt immer die Meldung "Undeclared identifier" - wenn ich das Bild aber so angebe wie unten kommt "Incompatible types: 'String' and 'TPicture' ". Wie muss ich das also angeben bzw. geht das so überhaupt?