открытие elementclient.exe

[Meg(0)]

открытие elementclient.exe

Windows.WinExec('C:\Games\Perfect World\element\elementclient.exe', Windows.SW_NORMAL);

вылетает ошибка..через sellexecute тоже самое,если этот адрес в папке прописать,то открывается..:
[Ссылки могут видеть только зарегистрированные пользователи. ]

[dwa83]

CreateProcess
Тут указывается каталог запуска. Мне кажется что при запуске вашим способом текущим считается каталог вашей проги и клиент пытается найти в нём нужные ему файлы, которых тут в помине нет.

У меня запуск такой(с++):

// Запуск игры
void CLIENT::RunGame(AnsiString path)
{
  STARTUPINFO si;
  PROCESS_INFORMATION pi;
  AnsiString dir=path+"\\element";
  AnsiString name=dir+"\\elementclient.exe";
  GetStartupInfo(&si);
  if(!CreateProcess(name.c_str(),"console:1", NULL, NULL, FALSE, 0, NULL, dir.c_str(), &si, &pi))
  {
    ShowMessage("Не удалось запустить клиент. Проверьте правильность указанной папки с игрой.");
  }
}

Как параметр передавать строку "C:\\Games\\Perfect World" именно с двойными слешами.

PS:

Цитата: Легче всего использовать WinExec. Однако Microsoft не рекомендует его использование, а предлагает пользоваться CreateProcess. Но для выполнения тех или иных задач он вполне подходит. Почему же нежелателен вызов WinExec дело все в том, что фактически он содержит обращение к еще одному устаревшему системному вызову LoadModule, который обращается к CreateProcess со значениями аргументов по умолчанию

[Meg(0)]

dwa83, попробовал через create process таже самая ошибка вылетает..(

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:\\Games\\Perfect World\\element\\elementclient.exe', ' elementclient.exe', 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;

[Kitsune]

Meg(0), и где же в вашем коде передается рабочая директория?

Цитата: Сообщение от Meg(0) CreateProcess('C:\\Games\\Perfect World\\element\\elementclient.exe', ' elementclient.exe', nil, nil, false, NORMAL_PRIORITY_CLASS, nil, nil, StartUpInfo, ProcessInfo);

вместо желтого вставить

'C:\\Games\\Perfect World\\element'

[Meg(0)]

TBX1n, о,огромное пасиб))

Добавлено через 53 минуты
а как потом найти хэндл этого окна?
так пробовал,не получается
vHandle := GetWindow(Application.Handle, GW_HWNDFIRST);

[Kitsune]

Цитата: Сообщение от Meg(0) а как потом найти хэндл этого окна?

1. Из ProcessInfo получаем хендл процесса и треда, в котором работает приложение
2. Делаем WaitForInputIdle передавая туда хендл процесса и максимальное время ожидания
3. Используем EnumThreadWindows, чтобы найти все окна, созданные в треде процесса

[Meg(0)]

пасиб,но сделаю всё проще через find window

[BritishColonist]

Минуточку, в дельфи же достаточно одного слеша при записи путей до файлов, не?

[Kitsune]

Цитата: Сообщение от Meg(0) пасиб

Для спасибо есть кнопка.

Цитата: Сообщение от Meg(0) но сделаю всё проще через find window

Это не даст вам 100% гарантии, что поймаете нужное окно.

[Meg(0)]

TBX1n, FindWindow(nil,Pchar('Perfect World')); 100% гарантия))

[Kitsune]

Цитата: Сообщение от Meg(0) FindWindow(nil,Pchar('Perfect World')); 100% гарантия))

При условии, что только одно окно запущено и называется Perfect World...