Запись данных в запущенное exe - Общие вопросы Delphi - Страница 2

Человек_Борща · 30.10.2010, 14:54

кстате не обязательно сразу говорить что "вирус" если человек хочет писать данные в exe.
Мысль о том что настройки постоянно "с собой" очень заманчива т.к. exe только один и нет никакого гемора.

Кстате взгляните на uTorrent.exe когда рядом с ним ложишь новый скин туллбара то куда он исчезает? Он в exe в виде ресурсов=)

хм разве что текстовые данные то могу дать маленькую наводку.
Любой тест можно дописать в конец exe=)

А значит при запуске копируем себя любимого в папку temp , ожидаем..

Далее пользователь там что-то пишет, естественно действия в программе такие:
Как только пользователь сохранил то что он написал, то файл сохраняется на диске,
вы берёте этот файл и дописываете в конец exe . Как писать текстовые данные я там где-то выше давал пример.. (Ссылка , пост #6).

Писать много текстовых тоже можно.
Грузить их в память, склеивать, писать в exe.
Дальше самозамещение. всё.

dmitriegorovih · 30.10.2010, 15:26

можно попробовать, но я пока ОТЛОЖУ это, потому что провозишься с этим, а оно не даст результат

Boris-Britva · 01.11.2010, 23:33

а не легче файлы подключать как ресурсы через RES ?

BOBAH13 · 01.11.2010, 23:37

Не нервничайте люди

пройдет у человека данный период "Одного .EXE". Думаю все проходили.

Человек_Борща · 02.11.2010, 00:42

Согласенс с Вованом=)

Boris-Britva · 02.11.2010, 03:33

вот так сделай:
допустим надо засунуть файл 1.mp3
1) Создаём файл SOUND.RC и пишем в него одну строку
MUS MP3FILE 0.mp3
2) В разделе implementation после строчки {$R *.dfm} добавляем
{$R 'Sound.res' 'Sound.rc'}
3) Добавляем в проект наш файл SOUND.RC через меню Project - Add to project
4)Компилируем.

Чтобы достать файл во время работы, достаточно написать код
Код:

procedure TForm1.Button1Click(Sender: TObject);
var
Res: TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, 'MUS', 'MP3FILE');
Res.SavetoFile('Music.mp3');//Имя под которым сохраним музыкальный файл
Res.Free;
end;

Пепел Феникса · 02.11.2010, 03:50

Boris-Britva, это вообще другое.

Alter · 02.11.2010, 14:15

Скоро это потеряет смысл

Stilet · 02.11.2010, 14:57

Сделать можно все!

Главное - ответить на вопрос: "А нуна ли это?"
Если у тебя есть карманы в штанах, стоит ли зашивать вещи, которые хочешь туда положить, внутрь штанов, да еще и на попную область?

30.10.2010, 15:26	#12
dmitriegorovih Ещё не Форумчанин Регистрация: 04.01.2010 Сообщений: 517	можно попробовать, но я пока ОТЛОЖУ это, потому что провозишься с этим, а оно не даст результат Воображение важнее, чем знания. (Albert Einstein) Последний раз редактировалось mihali4; 02.11.2010 в 14:16.

01.11.2010, 23:37	#14
BOBAH13 Android Developer Старожил Подтвердите свой е-майл Регистрация: 19.02.2007 Сообщений: 3,708	Не нервничайте люди пройдет у человека данный период "Одного .EXE". Думаю все проходили. Home \| Android for food \| XWindows Dock \| github

02.11.2010, 03:50	#17
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	Boris-Britva, это вообще другое. Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

02.11.2010, 14:15	#18
Alter Старожил Регистрация: 06.08.2007 Сообщений: 2,183	Скоро это потеряет смысл DelphiWorld 6, АVL 2.0.1.3

02.11.2010, 14:57	#19
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Сделать можно все! Главное - ответить на вопрос: "А нуна ли это?" Если у тебя есть карманы в штанах, стоит ли зашивать вещи, которые хочешь туда положить, внутрь штанов, да еще и на попную область? I'm learning to live...

30.10.2010, 14:54	#11
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,426	кстате не обязательно сразу говорить что "вирус" если человек хочет писать данные в exe. Мысль о том что настройки постоянно "с собой" очень заманчива т.к. exe только один и нет никакого гемора. Кстате взгляните на uTorrent.exe когда рядом с ним ложишь новый скин туллбара то куда он исчезает? Он в exe в виде ресурсов=) хм разве что текстовые данные то могу дать маленькую наводку. Любой тест можно дописать в конец exe=) А значит при запуске копируем себя любимого в папку temp , ожидаем.. Далее пользователь там что-то пишет, естественно действия в программе такие: Как только пользователь сохранил то что он написал, то файл сохраняется на диске, вы берёте этот файл и дописываете в конец exe . Как писать текстовые данные я там где-то выше давал пример.. (Ссылка , пост #6). Писать много текстовых тоже можно. Грузить их в память, склеивать, писать в exe. Дальше самозамещение. всё.

01.11.2010, 23:33	#13
Boris-Britva Пользователь Регистрация: 01.11.2010 Сообщений: 14	а не легче файлы подключать как ресурсы через RES ?

02.11.2010, 00:42	#15
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,426	Согласенс с Вованом=)

02.11.2010, 03:33	#16
Boris-Britva Пользователь Регистрация: 01.11.2010 Сообщений: 14	вот так сделай: допустим надо засунуть файл 1.mp3 1) Создаём файл SOUND.RC и пишем в него одну строку MUS MP3FILE 0.mp3 2) В разделе implementation после строчки {$R *.dfm} добавляем {$R 'Sound.res' 'Sound.rc'} 3) Добавляем в проект наш файл SOUND.RC через меню Project - Add to project 4)Компилируем. Чтобы достать файл во время работы, достаточно написать код Код: procedure TForm1.Button1Click(Sender: TObject); var Res: TResourceStream; begin Res := TResourceStream.Create(Hinstance, 'MUS', 'MP3FILE'); Res.SavetoFile('Music.mp3');//Имя под которым сохраним музыкальный файл Res.Free; end;

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Запись в ресурсы собственного exe?	Человек_Борща	Общие вопросы Delphi	3	02.08.2010 15:19
Запись данных в БД c формы	insense	БД в Delphi	6	17.06.2010 09:56
Чтение/запись настроек в саму себя(в exe).	Человек_Борща	Общие вопросы Delphi	19	04.06.2010 20:21
Запись данных в ячейку	orkus	Помощь студентам	15	30.03.2010 16:15
чтение из одного exe файла, и запись в другой exe	inndim	Общие вопросы Delphi	2	04.02.2009 15:23