Скачать: CL | DM;

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

← →
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.....

---

← →
EgorovAlex ©   (2007-02-24 21:00) [10]

Странно, я всё то-же самое делаю и у меня 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).

---

← →
EgorovAlex ©   (2007-02-24 21:50) [12]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.03 c