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

Вниз

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

 
Phantomouse ©   (2005-01-15 10:29) [0]

Приветствую!
Мне нужно отследить закрытие чужой программы, которую я запустил из своей с помощью функции SHellExecute. Подскажите, как это сделать (желательно с примером кода).


 
Kerk ©   (2005-01-15 10:57) [1]

Запускай с помощью CreateProcess
Жди с помощью WaitForSingleObject


 
Phantomouse ©   (2005-01-15 11:09) [2]

А примерчик кода можно? Просто хелп читать времени нет... Проект надо сдавать до обеда, а мелочь такую для эргономичности не получается дописать (


 
Kerk ©   (2005-01-15 11:11) [3]

Phantomouse ©   (15.01.05 11:09) [2]
в FAQ вроде есть


 
TUser ©   (2005-01-15 11:27) [4]

procedure Run;
var SI:_STARTUPINFOA;
   PI:_PROCESS_INFORMATION;
begin
  FillChar(SI,sizeof(SI),0);
  SI.cb:=Sizeof(SI);
  FillChar(FPI,sizeof(FPI),0);
  CreateProcess(nil,PAnsiChar({командная строка}),
                nil,nil,false,0,nil,nil,SI,PI);
  WaitForSingleObject(PI.pHandle,0); // ждять до выключения компа
end;



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

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

Наверх




Память: 0.45 MB
Время: 0.038 c
14-1105450032
Cosinus
2005-01-11 16:27
2005.01.30
У кого стоит русский Office2000 или XP, помогите с файликами


1-1106224690
WhiteGuy
2005-01-20 15:38
2005.01.30
Name of the File


1-1105694776
WhiteGuy
2005-01-14 12:26
2005.01.30
Найти файл


14-1105528663
Subdigger
2005-01-12 14:17
2005.01.30
xp, registry...


8-1097942663
TeNY
2004-10-16 20:04
2005.01.30
Формат изображения в TPicture





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский