|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Как зашить в ЕХЕ пару файлов
Подскажите пожалйста как зашить в ЕХЕ файл два файла и извлекать их от туда потом. Я слышал что дело надо иметь с ресурсами какими то. как их делать тоже расскажите.
|
#2
|
|||
|
|||
В FAQ есть раздел Файловая система и в нём — подраздел «Ресурсы», с многочисленными примерами.
|
#3
|
|||
|
|||
Спасиба бальшое.
Не сомневался что ответите мне именно вы))))))))))) |
#4
|
|||
|
|||
А если мне не ЕХЕ вшить надо а дргуой то в блокноте в строке
TESTFILE EXEFILE C:\Windows\Notepad.exe надо за место EXEFILE писать чтото дргуое наверно. и как потом этот txt откомпилировать с помощью brcc32? |
#5
|
|||
|
|||
Вы, видимо, не очень внимательно просмотрели раздел «Ресурсы».
Вот цитата из одной из статей: Цитата:
А вот еще статья. Ну, и так далее, на самом деле... |
#6
|
|||
|
|||
Через блокнот написал: FIL RCDATA CopyTraderSender.ex4.
Сохранил как myres.rc. Потом Через блокнот написал: brcc32.exe myres.rc и сохранил как makeres.bat файлы CopyTraderSender.ex4, myres.rc, makeres.bat лежат там же где и brcc32.exe. В проге написал: Код:
procedure TForm1.FormCreate(Sender: TObject); var res: TResourceStream; begin Res := TResourceStream.Create(Hinstance, 'FIL', 'RCDATA'); Res.SavetoFile('CopyTraderSender.ex4'); Res.Free; ... end; Project Project2.exe raised exception class eResNotFound with message 'Resourse FIL not found'. Почему? |
#7
|
|||
|
|||
А вы созданный ресурс прилинковали?
Код:
{$R test.res} //Это ваш RES-файл |
#8
|
|||
|
|||
Да, вот так:
Код:
implementation uses Unit2, Unit4; {$R *.dfm} {$R myres.res} procedure TForm1.FormCreate(Sender: TObject); ... Последний раз редактировалось одинадцатый, 12.05.2009 в 13:35. |
#9
|
|||
|
|||
А так?
Код:
Res := TResourceStream.Create(Hinstance, 'FIL', RT_RCDATA); |
#10
|
|||
|
|||
А так заработало)
Спасибо. |