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???