Показать сообщение отдельно

  #883  
Старый 18.12.2007, 17:08
presidentua
Постоянный
Регистрация: 04.11.2007
Сообщений: 331
С нами: 9746246

Репутация: 806
По умолчанию

Цитата:
Сообщение от NeXArmAor  
Есть вопрос,как правильно запускать файл через коммандную строку на Delphi? Мне нужно через коммандную строку передать параметры упиксу для того чтобы запаковать файл...но в итоге вылазиет окошко в красным текстом и тут же пропадает.
Передаю примерно так:
WinExec('C:\upx.exe --best D:\file.exe',1);
Sorry,if lame

{ Starts a programm with commandline parameters }

procedure OpenProgram(prog, params: string);
var
c, p: array[0..800] of Char;
begin
StrPCopy(c, prog);
StrPCopy(p, params);
ShellExecute(Application.Handle, 'open', c, p, nil, SW_NORMAL);
end;
 
Ответить с цитированием