Hallo oki,
vielen Dank für Deine Bemühungen, ich habe mir Deine Lösung leider nur Kurz ansehen können, aber ich finde den Ansatz sehr interessant.
p.s. Außerdem habe ich etwas über Endlosschleifen gelernt:
Delphi-Quellcode:
REPEAT
sleep(50);
Application.ProcessMessages;
UNTIL MyWeiter;
belastet den Prozessor (genauer die CPU-Auslastun im Taskmanager) fast gar nicht, aber
Delphi-Quellcode:
REPEAT
Application.ProcessMessages;
UNTIL MyWeiter;
führt zu einer 100% CPU-Auslastung
...und ein Druck auf
Delphi-Quellcode:
PROCEDURE TForm1.Button4Click(Sender: TObject);
BEGIN
sleep(3000);
END;
führt dazu, dass das Programm 3 Sekunden nicht ansprechbar ist (d.h. nicht einmal die Form läßt sich bewegen), da habe ich die
OH
Zitat:
The Sleep function suspends the execution of the current thread for a specified interval.
wohl falsch verstanden, ich meinte eher dass der Prozess "Prozessorzeit zurückgibt" aber doch noch Messages verarbeitet (wie der kleine Maxi sich das so vorstellt...).
Tja, man lernt nie aus!
