| 
			
			 
			
				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 ??? |