Как поменять иконку в исполняемом файле?

← →
VeLeS © (2007-02-21 02:17) [0]

Необходимо поменять иконку в исполняемом файле, имеется ввиду не в проекте Delphi а в готовом файле поменять, ресурс, 1-ю иконку, какие будут идеи?

← →
Elen © (2007-02-21 08:04) [1]

> какие будут идеи?

Microangelo, Restorator

← →
VeLeS © (2007-02-23 01:10) [2]

Имеется ввиду программно!!!

← →
Германн © (2007-02-23 02:07) [3]

> VeLeS © (23.02.07 01:10) [2]
>
> Имеется ввиду программно!!!
>

BeginUpdateResource
UpdateResource
EndUpdateResource

← →
EgorovAlex © (2007-02-24 18:18) [4]

А как можно сделать, чтобы с одной директивой компиляции была одна иконка, а с другой директивой - другая иконка? И чтобы "Version Info" была доступна?

← →
TStas © (2007-02-24 18:57) [5]

Application.Icon.LoadFromFile?

← →
EgorovAlex © (2007-02-24 19:06) [6]

Насколько я понимаю это поможет только в рантайме? Мне хочется, чтобы у самого экзешника менялась иконка - у меня один движок на две программы, и хочется для них разных иконок автоматом, ручками уже надоело постоянно менять.

← →
RASkov (2007-02-24 20:14) [7]

> [6] EgorovAlex © (24.02.07 19:06)

Может так поможет

program Project1; uses Forms, ........... {$IFDEF PRONE} {$R OneRes.res} {$ENDIF} {$IFDEF PRTWO} {$R TwoRes.res} {$ENDIF} begin Application.Initialize;

Ну и соответственно подготовить два ресурсных файла...
Я этим не занимался, просто мысль такая пришла...

← →
EgorovAlex © (2007-02-24 20:26) [8]

Я тоже снавала так и сделал, но... если так объявить, то невозможно задавать "Version Info" - оно просто задизаблено :(((

← →
RASkov (2007-02-24 20:43) [9]

> [8] EgorovAlex © (24.02.07 20:26)

Вот ради интереса проверил, все меняется. Вот проект
program Project1; uses Forms, Unit1 in "Unit1.pas" {Form1}; {$DEFINE PRONE} //<- PRTWO {$IFDEF PRONE} {$R OneRes.res} {$ENDIF} {$IFDEF PRTWO} {$R TwoRes.res} {$ENDIF} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.
Ресурсы подготовил с "использованием" Delphi на пустом новом проекте изменил параметры, (иконку, версию), сохранил, взял Project1.res скопировал в тестовый проект с именем OneRes.res, и тоже самое с TwoRes.res.....

Странно, я всё то-же самое делаю и у меня Icons пустое и задизаблено, и Version Info отключено и задизаблено :( - Turbo Delphi

← →
RASkov (2007-02-24 21:09) [11]

> [10] EgorovAlex © (24.02.07 21:00)

Оно задисаблено в тестовом(в твоем случае рабочем) проекте, но создай новый и выстывь опции проекта как тебе надо (иконку, версию) сохрани во временный каталог и возьми от туда Project1.res переименуй(OneRes.res) и скопируй в свой рабочий каталог с твоим проектом, и тоже самое с другим (TwoRes.Res).

Это понятно, что так работает, мне бы ещё хотелось иметь возможность менять Version Info

Как поменять иконку в исполняемом файле? Найти похожие ветки