
02.04.2013, 08:22
|
 |
Let Me Show You
|
|
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
|
|
Цитата:
Сообщение от speles
Такое поведение только когда запускаю приложение из Delphi. Когда запускаю отдельно - все ОК. >_<
|
неправда:
Код:
var
StartupInfo: TStartupInfo;
ProcessInformation: TProcessInformation;
begin
ZeroMemory(@StartupInfo, SizeOf(TStartupInfo));
StartupInfo.cb:=SizeOf(TStartupInfo);
StartupInfo.dwFlags:=STARTF_USESHOWWINDOW;
StartupInfo.wShowWindow:=SW_SHOWNORMAL;
if CreateProcess(nil, 'c:\WINDOWS\system32\calc.exe', nil, nil, False, 0,
nil, nil, StartupInfo, ProcessInformation) then
begin
CloseHandle(ProcessInformation.hThread);
CloseHandle(ProcessInformation.hProcess);
end;
end;
все прекрасно работает и из под Delphi.
и зачем флаг STARTF_USESTDHANDLES ???
__________________
Пишу программы за еду.
__________________
|