VPF::програмно включить res файл в exe

Volkogriz

Дата 13.1.2013, 05:24 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 216
Регистрация: 16.9.2007

Репутация: 1
Всего: 1

Доброе время суток!
Вопрос собственно такой:
есть архив res есть заготовка exe как всунуть программно res файл внутрь exe?
Не при помощи {$R архив.res} а программно smile

Заранее благодарен.
С уважением,
Volkogriz!

--------------------

("`-''-/").___..--''"`-._`6_6 ) ,,,`-. ( ''' ).` "_-.__.')(_Y_.)' ._''' ) `._ `. ``-.__'.-'_..`--'_..-_/'''/--'_.' ,'(il).-'''''(li).' ((!.-'

DarkProg

Дата 13.1.2013, 11:45 (ссылка)

(голосов:1)

Загрузка ...

Законченный романтик

Профиль
Группа: Завсегдатай
Сообщений: 1784
Регистрация: 11.3.2009
Где: Земля

Репутация: 2
Всего: 19

Если очень коротко, то нужны три функции WinAPI, почему три я так до конца и не понял, если честно....

Код


    UpHandle := BeginUpdateResource (pWideChar(GetLibraryPath+'ResDLL.dll'), False);

    stStream:=TStringStream.Create;
    stStream.WriteString(NewDigest);
    stStream.Seek(0, soFromBeginning);

    if UpdateResource(UpHandle, RT_RCDATA, 'RESNAME', MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), stStream.Memory, stStream.Size) then
      begin
        if EndUpdateResource(UpHandle, False) then
           begin
              //Обновление прошло успешно
           end;
      end;

Суть этого куска кода в тому что я беру и запихиваю строку в ResDLL.dll, но у меня в библиотеке был уже пустой ресурс с именем RESNAME, но согласно MSDN UpdateResource может и добавлять ресурс в том числе, но я не проверял это сам. Но в общем вот направление в котором копать.

--------------------

"И твоя голова всегда в ответе за то куда сядет твой зад..."

"Я студент - скажите с какого я ВУЗа..."

smile

Keeper89

Дата 13.1.2013, 15:05 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 20
Всего: 58

http://stackoverflow.com/questions/6054300...executable-file

--------------------

Cogito, ergo sum

Keeper's blog
CnWizards Downloads

user posted image

Volkogriz

Дата 13.1.2013, 15:38 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 216
Регистрация: 16.9.2007

Репутация: 1
Всего: 1

Огромное всем спасибо!
Перерыл весь поиск и не нашёл не чего подобного(
Наверно плохо искал:)

--------------------

("`-''-/").___..--''"`-._`6_6 ) ,,,`-. ( ''' ).` "_-.__.')(_Y_.)' ._''' ) `._ `. ``-.__'.-'_..`--'_..-_/'''/--'_.' ,'(il).-'''''(li).' ((!.-'

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »