Inkompatible Typen?

[MrMyagi]

Moin,
könnt ihr mir zufällig sagen, wie ich dieses hier verbessern muss?

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if ((0<GrafikAuto.Top<640) and (0<GrafikAuto.Left<870)) then
begin
ShowMessage('Das Auto ist im Gebiet');
end;
end;

mfG, Nico