|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
сохранение программой самой себя
доброе время соток,подскажите,как написать программный код с помощью которого программа могла бы сама себя сохранить.
(просмотрев исходники нашел антоним моему вопросу-удаление самой себя - http://www.delphisources.ru/pages/so...-self-exe.html -) они могут быть как-то похожи? спасибо,буду благодарен за помощь. |
#2
|
|||
|
|||
Что значит "сохранить себя"? Скопировать исполняемый модуль? Дык это просто - CopyFile(Application.ExeName,'NewFileName.exe')
|
#3
|
||||
|
||||
это поставить в процедуру нажатия исполняющей клавиши без каких-либо дополнительных заморочек? грубо говоря:
procedure TForm37.Button1Click(Sender: TObject); begin CopyFile(Application.ExeName,'NewFileName.exe') end; |
#4
|
||||
|
||||
самой себя подразумевается сохранить в принципе ту папку в которой лежат все данные,связанные с проектом,в другое место,это по заданию так...
не сохранение только EXE файла... |
#5
|
||||
|
||||
Если это только файлы в каталоге приложения, то FindFirst,FindNext и вперед. Если это еще и каталоги в этой папке, то рекурсивный обход поможет, а если это еще и какие-то выборочно файлы в System32 или еще где, то тогда лучше по заранее подготовленному списку работать.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#6
|
||||
|
||||
хорошо,спасибо)
|