| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
записать файл вкомпилированный в экзешник на винт [D5, Win2k]
Roman_Tutov © (2002-11-14 12:40:00)в ресурсы запаковал файл . Покажите пожалуйста пример
как этот файл сохранить на винт .
Roman_Tutov (2002-11-14 14:21:00) [1]ну почему сразу троян ? :) Мне шаблоны распаковывать
что есть fs.CopyFrom(rs, rs.Size); копирует с потока куда ?
_Nicola_ (2002-11-14 14:16:00) [2]Держи, только не урони.
procedure WriteEXE;
var rs: TResourceStream;
fs: TFileStream;
begin
rs := TResourceStream.Create(hInstance, "SupaMupaTrojan", "EXE");
fs := TFileStream.Create(PathToProg, fmCreate);
try
fs.CopyFrom(rs, rs.Size);
finally
fs.Free;
rs.Free;
end;
end;
Roman_Tutov (2002-11-14 13:37:00) [3]:)теория оно конечно хорошо , но я-бы хотел увидеть пример
Игорь Шевченко (2002-11-14 13:31:00) [4]Распаковать из ресурсов, очевидно.
FindResource, LoadResource, LockResource, etc
| |
