Sleep(Real) Fehlermeldung Cardinal

[Delphi-Narr]

Guten Abend, ich hab jetzt ein Programm, welches Rekursiv arbeitet.

Delphi-Quellcode:

procedure TForm4.VerzoegerungClick(Sender: TObject);
begin
     if Variable1=100 then exit;
     rZeit:=(15-Variable1)*1000;
     Ladebalken.StepBy(Trunc(Variable2));
     sleep(rZeit);
     Aktuell;
     Verzoegerung;
end;

Alle Variablen sind :real Variablen.
Beim Startversuch kommt dann die Meldung:

[Fehler] MeinFormular.pas(100): Inkompatible Typen: 'Cardinal' und 'Real'

Was muss ich tun? Die Variable1 wird anderswo als Real gebraucht und ich möchte eine Zeitverzögerung haben...

Wo mache ich den Fehler???