Stoppuhr (if/else)

[Delphi-_-N00b]

hallo
ich will eine einfach stoppuhr machen bin grade erst bei den sekunden bis 9, aber ich habe keine imagelist. weil ich das nicht verstehe ich wollte es folgendermaßen machen:
immer wenn das bild mit der 1 ist und der timer den impuls sendet soll 1-visible false gehen und 2 dafür an. Wenn das bild 2 da ist soll das unsichtbar werden und 3 sichtbar usw...

Quellcode:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
timer1.enabled:=true  ;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin

if Image10.Visible:=true
then begin
Image10.Visible:=false;
Image1.Visible:=true;
end;

if Image1.Visible:=true
then begin
Image1.Visible:=false;
Image2.Visible:=true;
end;

if Image2.Visible:=true
then begin
Image2.Visible:=false;
Image3.Visible:=true;
end;

if Image3.Visible:=true
then begin
Image3.Visible:=false;
Image4.Visible:=true;
end;

if Image4.visible:=true
then begin
Image4.Visible:=false;
Image5.Visible:=true;
end;

if Image5.visible:=true
then begin
Image5.Visible:=false;
Image6.Visible:=true;
end;

if Image6.visible:=true
then begin
Image6.Visible:=false;
Image7.Visible:=true;
end;

if Image7.visible:=true
then begin
Image7.Visible:=false;
Image8.Visible:=true;
end;

if Image8.visible:=true
then begin
Image8.Visible:=false;
Image9.Visible:=true;
end;

if Image9.visible:=true
then begin
Image9.Visible:=false;
Image10.Visible:=true;
end;

end;

In jeder zeile mit "then begin" kommt der fehler: Type of expression must be boolean