Аналог функции Delay в Delphi -> Форум на Исходниках.RU [Powered by Invision Power Board]

Версия для печати
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум на Исходниках.RU > Общие вопросы > Аналог функции Delay в Delphi

Автор: Vit 10.11.03, 20:10

Для небольших промежутков можно использовать:

CODE

Sleep(количество миллисекунд)

При больших зедержках (больше секунды) задержка будет приводить к тому что приложение будет выглядеть зависшим, можно использовать следующую функцию:

CODE

Procedure Delay(Secunds:integer);
var i:integer;
begin
for i:=0 to Secunds*10 do
begin
sleep(100);
application.processmessages;
end;
end;