Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перезапись запущенного EXE файла [D5, Win95/98]


Arkady ©   (2002-08-05 11:00:00) 

Как перезаписать запущенный исполняемый (EXE) файл программы, не выходя из нее?


Anatoly Podgoretsky   (2002-08-06 09:48:00) [1]

Arkady © (06.08.02 09:32)
Во время выполнения нельзя, можно только до или после. При том у тебя написано пользователи, так что речь во множественном числе, тут вообще тяжело, надо выгонять и блокировать.


Ученик   (2002-08-06 09:45:00) [2]

Было в форуме решение, пользователи запускают маленькую программу, которая в свою очередь запускает основной модуль, основной модуль имеет название ProgramName_NNN.exe, NNN - число, маленькая программа ищет основной модуль с максимальным NNN.


Arkady   (2002-08-06 09:32:00) [3]


> B_Sergey © (05.08.02 22:03)


Спасибо, но мне необходимо заменять EXE-файл во время выполнения программы (пользователи работают с программой практически весь день).


B_Sergey   (2002-08-05 22:03:00) [4]

В Win9x только через .bat файл, в нём... кароче моя процедура
работает безотказно, проверял несколько раз.
Delphi 3.0
AssignFile(f,bat_file);
rewrite(f);
Writeln(f,"@echo off");
Writeln(f,":try");
Writeln(f,"cd " + ExtractFileDir(FileName));
Writeln(f,"del " + ExtractFileName(FileName));
Writeln(f,"if exist " + ExtractFileName(FileName) + " goto try");
Writeln(f, "ren " + ChangeFileExt(ExtractFileName(FileName), ".ww ") + ExtractFileName(FileName));
Writeln(f, ExtractFileName(FileName));
Write(f,"del " + bat_file);
CloseFile(f);
ZeroMemory(@si,sizeof(si));
si.cb:=sizeof(si);
si.wShowWindow:=SW_HIDE;
si.dwFlags:=STARTF_USESHOWWINDOW;
CreateProcess(nil, PChar(bat_file), nil, nil, False,
IDLE_PRIORITY_CLASS or DETACHED_PROCESS, nil, nil, si, pi);
сначало копируешь свой .exe в .ww и...
создаёт .bat файл который ждёт завершения твоей программы, после чего заменяет его файлом в .ww, сам батник висит без окна DOS и его невидно не вооружённым глазом, заверши свою программу и запустится новая, я после переименования изменял код .exe (хранил в нём пароль).
Если что пишине стесняйся.


Arkady   (2002-08-05 15:21:00) [5]


> Delirium © (05.08.02 12:22)


А как быть с Windows 98? Переименовать EXE-файл не удается.


Ученик   (2002-08-05 12:40:00) [6]

>Delirium
Переименовали и записали новый


Delirium   (2002-08-05 12:22:00) [7]

Хм, в NT можно просто переименовать работающий EXE-шник.


Ученик   (2002-08-05 11:18:00) [8]

Можно через исполнение командного файла (bat, cmd), но выход из программы все-таки будет.
Под Windows NT, функция MoveFileEx.


Digitman   (2002-08-05 11:04:00) [9]

Никак.


Наверх

Титульная страница Поиск, карта сайта Написать письмо