
23.05.2013, 17:53
|
Начинающий
|
|
Регистрация: 03.03.2013
Сообщения: 106
Версия Delphi: Delphi 7, XE5
Репутация: 10
|
|
Я это видел
Цитата:
Сообщение от M.A.D.M.A.N.
Вы не нуб, вы лентяй.
Код:
//==============================================================================
function RunMyAppHidden(my_app : string; my_wait : bool) : bool; // по идее можно в процедуру переписать
var
si : TStartupInfo;
pi : TProcessInformation;
begin
Result := false;
try
ZeroMemory(@si,SizeOf(si));
si.cb := SizeOf(si);
si.dwFlags := STARTF_USESHOWWINDOW;
si.wShowWindow := SW_SHOWNORMAL; // <--- обрати внимание на этот флаг
if CreateProcess(nil,PChar(my_app),nil,nil,False,0,nil,nil,si,pi)=true then Result := true;
try CloseHandle(pi.hThread); except ; end;
if my_wait = true then WaitForSingleObject(pi.hProcess, INFINITE);
try CloseHandle(pi.hProcess); except ; end;
except
Result := false;;
end;
end;
//==============================================================================
http://www.sql.ru/forum/273134/zapus...-createprocess
|
Я видел это, но не нашел просто какие передавать параметры. И как передать туда параметры для запуска. И что вы думаете про это:
Код:
WinExec('java -jar + ПутьДоИгры + Launch', SW_SHOW);
|