![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
|
Здравствуйте. Такой вот вопрос - нужно выдернуть процедуру Sleep из SysUtils.
Код:
procedure Sleep; external kernel32 name 'Sleep'; stdcall;
{$ENDIF}
{$IFDEF LINUX}
procedure Sleep(milliseconds: Cardinal);
begin
usleep(milliseconds * 1000); // usleep is in microseconds
end;
{$ENDIF}Но так выдает кучу ошибок. Кто может - подскажите. |
|
#2
|
||||
|
||||
|
Все, сам разобрался:
Код:
procedure Sleep(milliseconds: Cardinal); stdcall; external 'kernel32.dll' name 'Sleep'; |
|
#3
|
||||
|
||||
|
Есть еще NtDelayExecution из ntdll, она покруче будет, там до сотен наносекунд можно задержку ставить.
|
| Этот пользователь сказал Спасибо M.A.D.M.A.N. за это полезное сообщение: | ||
Speech (20.06.2013)
| ||
|
#4
|
||||
|
||||
|
так
Цитата:
|
| Этот пользователь сказал Спасибо NumLock за это полезное сообщение: | ||
Speech (20.06.2013)
| ||