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

Вниз

Как запустить приложение с параметром? :)   Найти похожие ветки 

 
TankMan1   (2004-08-25 09:02) [0]

Ну не занаю я как запускать приложение с параметром :), пробовал CreateProcces(PChar(Мое приложение+" "+параметр),nil,блаблабла)
Но почему-то не запускает вообще :(


 
Ega23 ©   (2004-08-25 09:05) [1]

WinExec, ShellExecute + F1


 
Рамиль ©   (2004-08-25 09:08) [2]

Ага, крнечно, запустится с блаблабла
var
 Rlst: LongBool;
 StartUpInfo: TStartUpInfo;
 ProcessInfo: TProcessInformation;
 Error: integer;
begin
 FillChar(StartUpInfo, SizeOf(TStartUpInfo), 0);
 with StartUpInfo do
 begin
   cb := SizeOf(TStartUpInfo);
   dwFlags := STARTF_USESHOWWINDOW or STARTF_FORCEONFEEDBACK;
   wShowWindow := SW_SHOWNORMAL;
 end;
 Rlst := CreateProcess("C:\Windows\System32\notepad.exe", " c:\readme.txt", nil, nil, false, NORMAL_PRIORITY_CLASS, nil, nil, StartUpInfo, ProcessInfo);
 if Rlst then
 with ProcessInfo do begin
   WaitForInputIdle(hProcess, INFINITE); // ждем завершения инициализации
   CloseHandle(hThread); // закрываем дескриптор процесса
   CloseHandle(hProcess); // закрываем дескриптор потока
 end
else Error := GetLastError;
end;


Эквивалент
Rlst := CreateProcess(nil, "notepad c:\readme.txt", nil, nil, false, NORMAL_PRIORITY_CLASS,
nil, nil, StartUpInfo, ProcessInfo);



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

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

Наверх




Память: 0.47 MB
Время: 0.087 c
4-1090596820
parovoZZ
2004-07-23 19:33
2004.09.12
Картинка в пункте меню


1-1093370651
Schummi
2004-08-24 22:04
2004.09.12
Вопрос про package


14-1092479913
YurikGL
2004-08-14 14:38
2004.09.12
Пользователи Active Directory


3-1092710262
Sirus
2004-08-17 06:37
2004.09.12
Соединение с Firebird тормозит на Windows XP...


3-1092750216
Jey
2004-08-17 17:43
2004.09.12
Резервное копирование баз данных