Показать сообщение отдельно
  #5  
Старый 15.04.2012, 01:44
JackRu JackRu вне форума
Прохожий
 
Регистрация: 08.07.2009
Сообщения: 46
Репутация: 10
По умолчанию

Код:
java -Xms1024m -Xmx1024m ...
Как я понимаю, приравнивается к C:\Program Files\Java\jre6\bin\java.exe

Так что это лишнее, спасибо )

А по поводу ковычек, как в батнике было, так всё и скопировал, т.к. батник работает на ура ...

Вот что получилось, но всё равно никакой реакции, даже окно командной строки не грузится ...

Код:
procedure TFrame11.sButton3Click(Sender: TObject);

var
  StartupInfo: TStartupInfo;
  ProcessInfo: TProcessInformation;
begin
  FillChar(StartupInfo, sizeof(StartupInfo), 0);
  StartupInfo.cb := Sizeof(StartupInfo);
  StartupInfo.dwFlags := STARTF_USESHOWWINDOW;
  StartupInfo.wShowWindow := SW_SHOWNORMAL;

  FillChar(ProcessInfo, sizeof(ProcessInfo), 0);

  CreateProcess(nil,
                PChar('C:\Program Files\Java\jre6\bin\java.exe' + ' -Xms1024m -Xmx1024m -cp "%APPDATA%\logsfile\*" -Djava.library.path="%APPDATA%\logsfile\files" net.soft.client.progtam "Neom"'),
                nil,
                nil,
                False,
                CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS,
                nil,
                '%APPDATA%\logsfile\',
                StartupInfo,
                ProcessInfo);
end;
Ответить с цитированием