|
Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.477 Beiträge
Delphi 12 Athens
|
AW: Hilfe Mein Programm Laggt!
20. Dez 2010, 11:59
Ist keine Soundkarte vorhanden, verwendet die Funktion Beep() die ganze CPU-Leistung nur dafür, den Lautsprecher 20 ... 20000 mal je Sekunde möglichst synchron ein- und auszuschalten. Wärend dieser Zeit ist das System praktisch ausgelastet. Erst danach wird die Funktion wieder verlassen.
(Unter Windows 7 wird vermutlich deshalb nur noch mit Soundkarte überhaupt etwas ausgegeben.)
Das heist der Timer ist überflüssig, es genügt zwischen den Tönen Application.ProcessMessages aufzurufen.
|