Хорошо, на примере кода покажу чего я не совсем понял. Я не спорю что вообще нужно образование чтоб поправить 1 строчку, просто я когда попробовал исправить её у меня не происходило вообще ничего. Итак, вот первая версия кода которую я пробовал:
| Код |
procedure TfrmMain.Button1Click(Sender: TObject);
var
pi:TProcessInformation;
si:TStartupInfo;
begin
FillChar(si, SizeOf(TStartupInfo), 0);
si.cb:=SizeOf(TStartupInfo);
CreateProcess(
nil, // в принципе, можно указать имя запускаемого файла и здесь, но тогда могут начаться проблемы с
// передачей командной строки
PChar(ChangeFileExt(ParamStr(0), 'ergoz.bin')+' -ip:127.0.0.1'), // поэтому указываем всё в lpCommandLine
nil,
nil,
False,
CREATE_DEFAULT_ERROR_MODE,
nil,
nil,
si,
pi);
end;
|
на такой код программа по нажатию кнопки никак не реагировала, и не производила никаких действий.
Вот на такой код:
| Код |
procedure TForm1.sButton1Click(Sender: TObject);
var
pi:TProcessInformation;
si:TStartupInfo;
begin
FillChar(si, SizeOf(TStartupInfo), 0);
si.cb:=SizeOf(TStartupInfo);
CreateProcess('ergoz.bin',PChar('"' + 'aion.bin' + '" ' + '-ip:127.0.0.1'),nil,nil,False,CREATE_DEFAULT_ERROR_MODE,nil,nil,si,pi);
end;
|
и на такой:
| Код |
procedure TfrmMain.Button1Click(Sender: TObject);
var
pi:TProcessInformation;
si:TStartupInfo;
begin
FillChar(si, SizeOf(TStartupInfo), 0);
si.cb:=SizeOf(TStartupInfo);
CreateProcess( 'ergoz.bin', PChar(ChangeFileExt(ParamStr(0), 'ergoz.bin')+' -ip:127.0.0.1'), nil,nil,False,CREATE_DEFAULT_ERROR_MODE,nil,nil,si, pi);
end;
|
программа запускается (как я понимаю благодаря появлению 1 параметра с адресом запускаемой программы), но она запускается не совсем правильно, и никак не пойму в чём дело. Суть в том что если через батник запускаю такого вида:
| Код |
@echo off
ergoz.bin -ip:127.0.0.1 -ng
exit
|
то приложение, как и должно, запускается не в полном экране и без ошибок каких либо. Но если запускаю вручную в командной строке так:
| Код |
C:\main\game>ergoz.bin -ip:127.0.0.1
|
то запускается в полном экране, игнорируя все начальные конфиги программы которую запускаю, + ошибка загрузки шрифтов, т.е. неправильно (из моей программы с такими же проблемами запускается). Я никак не могу ещё понять почему так, даже когда вручную в цмд пишу запуск. бьюсь уже над этой проблемой несколько часов и никак не соображу в чём дело... |
)
хотя... может, дело в кавычках, действительно... позже проверю, если не забуду.
