Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.12.12;
Скачать: CL | DM;

Вниз

Задержка   Найти похожие ветки 

 
iWorm ©   (2003-12-03 02:42) [0]

Здравствуйте, у меня такой вопрос:
a:= a+a;
sleep(500);
b:= b-b;
есть две строчки кода, необходимо после выполнения первой сделать пайзу в опр. время. Как я понимаю, если вставить sleep то я получу свой результат ценой подвисания приложения, так вот, может кто расскажет, что необходимо еще может добавить?
Спасибо.


 
Maxud ©   (2003-12-03 02:53) [1]

Пока только так придумал:

c := 500;
while c > 0 do
begin
dec(c, 50);
Application.ProcessMessages;
end;


 
closer ©   (2003-12-03 03:07) [2]

Посмотри ответ на вопрос "Как сделать приложение (не сервис) не видимым в таскменеджере?" в этой группе.


 
Maxud ©   (2003-12-03 03:16) [3]

хм, действительно...



Страницы: 1 вся ветка

Текущий архив: 2003.12.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
11-36589
Ал
2003-03-28 14:12
2003.12.12
Как правильно объявить и вызвать функц., доступную из всех Юнитов


3-36522
MaxwellZ
2003-11-23 17:51
2003.12.12
Индекс текущей записи


14-36803
Даааа
2003-11-19 16:00
2003.12.12
Это чтоже получается


1-36710
timM
2003-12-03 12:34
2003.12.12
fsMDIForm и Dll


3-36511
KPPL
2003-11-22 22:16
2003.12.12
DB