Главная страница
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.083 c
1-1091431276
dima
2004-08-02 11:21
2004.09.12
тест на delphi


3-1092435789
JaVa73
2004-08-14 02:23
2004.09.12
Отображение данных в DBComboBox


14-1092838656
Яшка
2004-08-18 18:17
2004.09.12
Мнение, как движущая сила дискуссий.


14-1092977204
Рамиль
2004-08-20 08:46
2004.09.12
Ведение реестра акционеров эмитентом


14-1093090633
Вольный Стрелок
2004-08-21 16:17
2004.09.12
настройка Opera 7 для чтения news-конференций