плохо искал наверно Нажать xD
Вид для печати
плохо искал наверно Нажать xD
Чем плох тот, который я выкладывал?
http://pawno.su/threads/34044-Restar...%D0%B4-Windows
Ааа ступил.
Извиняюсь :)
Ок стайл.слежу за всеми твоими разработками. и хочу сказать Ты реально крутой программист.
Спасибо больше + ваш
Нормальны программист сделал бы примерно вот так, а не извращался бы с bat-файлами :)
Код на делфи:
Данный код запускает samp-server.exe и ждет пока он завершиться, после чего ждет 1 сек. и снова запускает.Код:program restarter;
{$APPTYPE CONSOLE}
uses Windows;
Procedure Main;
var StartInfo:TStartupInfo;
ProcInfo:TProcessInformation;
Path:array [0..MAX_PATH] of AnsiChar;
begin
ZeroMemory(@StartInfo, SizeOf(StartInfo));
StartInfo.cb:=SizeOf(StartInfo);
GetCurrentDirectory(MAX_PATH, Path);
repeat
CreateProcessA('samp-server.exe','', nil, nil, True, CREATE_DEFAULT_ERROR_MODE,
nil, Path, StartInfo, ProcInfo);
WaitForSingleObject(ProcInfo.hProcess, INFINITE);
Sleep(1000);
until false;
end;
begin
main;
end.
Скомпелированный файл: http://rghost.ru/38075210
Кинуть в папку сервера и запустить.
Ну значит я ненормальный программист, так как написал софтинку без использования ООП'шных языков.