Ein Problemm mit sleep

[ferby]

Hallo,

Ich habe in meinem Spiel stehen:

Delphi-Quellcode:

procedure TForm1.spieltimerTimer(Sender: TObject);
begin

  if status='ladelevel' then
  begin
  levellabel.Visible:=true;
  level:=level+1;
  levellabel.caption:='Level ' + inttostr(level);
  sleep(2000);
  levellabel.visible:=false;
  shipimg.Visible:=true;
  status:='spiel';
  end;

end;

Es soll bewirken das zwei Sekunden Lang am Bildschirm steht: Level 1 und dann soll eine Grafik eingeblendet werden. Aber der Text Level 1 erscheint nie warum?
Nach zwei Sekunden wird dann die Grafik eingeblendet.