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

Вниз

Install Shield не запускается из под CreateProcess   Найти похожие ветки 

 
stikriz   (2002-06-25 06:37) [0]

Чего-то не запускается InstallShield вызовом CreateProcess с ожиданием завершения. Чего ему надо?


 
Gandalf   (2002-06-25 12:31) [1]

Занимался этим давно, но минуту назад снова использовал. Если я правильно понял проблему то решается так:
...

FillChar( Si, SizeOf( Si ) , 0 );
with Si do begin
cb := SizeOf( Si);
dwFlags := startf_UseShowWindow;
wShowWindow := SW_SHOWNORMAL;
end;
Application.Minimize;
str:=CorPath(ExtractFileDir(ParamStr(0))+"\Setup.exe");
str2:=ExtractFileDir(ParamStr(0));
Createprocess(nil,PChar(str),nil,nil,false,Create_default_error_mode,nil,PChar(ExtractFileDir(str)),si,p);
While FindWindow("InstallShield_Win","Micro-Cap 7.0 Setup")<=0 do
Application.ProcessMessages;
While FindWindow("InstallShield_Win","Micro-Cap 7.0 Setup")<>0 do
Application.ProcessMessages;
Sleep(1000);
...
Все инталляция завершена



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

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

Наверх




Память: 0.46 MB
Время: 0.014 c
6-95936
RedArc
2002-06-19 17:36
2002.08.29
Почтовый робот


6-95924
Monak
2002-06-20 20:19
2002.08.29
IP и хост


1-95795
^Sanya
2002-08-19 14:59
2002.08.29
Опять и опять....


1-95882
Андрусь
2002-08-13 20:34
2002.08.29
Помогите разобраться


1-95798
Aszbed
2002-08-19 14:47
2002.08.29
Все равно не понял :о)