Функция для Sleep

[russian-stalker]

Вот юзая функцию Sleep для игр я заметил что враги замирают, нельзя ли сделать чтобы она действовала только на определёную функцию

[SunKnight]

помойму sleep приостанавливает работу всего приложения.

[russian-stalker]

А чем можно притормозить время перед следующим выполнением функции, конструкции for..to..do.

[MAcK]

в переменную заносишь время + 2 ctreyls, потом проверяешь:
While (MyTime < Now ) do
begin
Application.ProcessMessages;
end;

[russian-stalker]

А можно поподробней?

[Terran]

Можно использовать задержку Delay.

Procedure Delay(Ms: Longint);
Var
TheTime: LongInt;
Begin
TheTime:= GetTickCount + Ms;
While GetTickCount < TheTime Do
Application.ProcessMessages;
End;