Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.07.01;
Скачать: [xml.tar.bz2];

Вниз

Как можно реализовать задержку в выполнении программы?   Найти похожие ветки 

 
Looser   (2002-06-17 23:39) [0]

Хочу убрать всплывающее окно при загрузке программы, но закрыть его можно только через 5 секунд после запуска. Как эту ПАУЗУ реализовать? Заранее спасибо! Код прилагается:

WinExec("D:\Program\PowerStrip\pstrip.exe", 1);
hPSWnd := FindWindow("TTipsForm", NIL);
ShowWindow(hPSWnd, SW_HIDE);
// нужна пауза 5 секунд -->
PostMessage(hPSWnd, WM_CLOSE, 0, 0);


 
Looser   (2002-06-17 23:49) [1]

Я хотел вначале попробовать:

repeat
PostMessage(hPSWnd, WM_CLOSE, 0, 0);
until True;

Но похоже PostMessage возвращает True даже если окно не закрылось, да и процессор это грузит.


 
Pat   (2002-06-17 23:50) [2]

Sleep()?


 
rhf   (2002-06-17 23:51) [3]

sleep(5000)


 
Looser   (2002-06-18 00:45) [4]

Спасибо! Дальше может немножко не в тему, да и это не кряк-форум :) НО! Каждый раз после запуска моей чудо-проги, задержка у этого окна увеличивается. И сколько бы я не увеличивал задержку, окно будет недоступным все-равно дольше :) Да уж...


 
Егоров Николай   (2002-06-18 05:35) [5]

Ну если сильно мозолит глаза,попробуй так:
SetWindowPos(hPSWnd,0,-100,-100,1,1,SWP_HIDEWINDOW);



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

Форум: "Основная";
Текущий архив: 2002.07.01;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.006 c
1-935
Vitalik
2002-06-19 15:51
2002.07.01
Debugger


1-1096
Evgeny
2002-06-18 12:43
2002.07.01
CreateWindow


6-1119
Georg
2002-04-19 17:04
2002.07.01
Вопрос по прокси-серверам.


1-1041
Cranium
2002-06-18 13:39
2002.07.01
Строку из txt в string


4-1242
MisterBin
2002-05-02 16:27
2002.07.01
Закрыть чужое окно при наведении на него мышкой





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский