Главная страница
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.017 c
1-36626
BDRON
2003-11-30 00:10
2003.12.12
Memo независимый от размера шрифта


7-36855
Andriy Tysh
2003-10-04 12:58
2003.12.12
Сетевой принтер


1-36730
ased
2003-12-02 12:05
2003.12.12
Запуск exe для 1024x768 в 800x600


3-36556
Степан
2003-11-20 19:24
2003.12.12
ADO, пустая таблица


1-36604
Relaxxx
2003-12-01 15:32
2003.12.12
Есть ли сочетание букв в слове???