Форумчанин
: 201
Как изменить значок .ехе файла Delphi?
После создания программы на Delphi, она формируется в .ехе файл который выглядит как на прикрепленной к теме картинке. Можно ли сменить этот значок на какой-нибудь другой, или поставить свою картинку?
Изображения
значок.jpg (14.2 Кб, 503 просмотров) |
Участник клуба
: 1,977
В меню Tools есть встроенный редактор Image Editor.Открыть этим
редактором файл ресурсов проекта (в нем обычно находится иконка
.exe файла).Сменить иконку на свою.Требования к иконке — 32 х 32 пикселя, новая иконка должна создаваться с расширением .ico (можно в этом же редакторе).
Есть и программный способ:
Application.Icon.Hendle:= LoadIcon(hInstance,’NameIcon’); InvalidateRect(Application,hendle,NIL,True);
И не сомневайся даже . отдых — кайф, работа — лажа!
Белик Виталий 🙂
: 57,792
Если не ошибаюсь в Project->Options там где-то есть Icon вот и выбери другую иконку.
1. Урок legioni ( Как заменить иконку в программе Delphi )
I’m learning to live.
Форумчанин
: 201
: 9,201
Если не ошибаюсь в Project->Options там где-то есть Icon вот и выбери другую иконку.
Совершенно верно. Плюс к этому — способ из моего ФАКа:
Смена иконки приложения «на ходу» Например: Application.Icon.LoadFromFile(‘c:n ewicon.ico’); |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как уменьшить размер .ехе файла? D7 | dx+ | Общие вопросы Delphi | 28 | 16.03.2012 20:38 |
Изменить формат файла | Манжосов Денис 🙂 | Операционные системы общие вопросы | 5 | 29.12.2009 17:56 |
как поменять иконку своего ехе файла | Skalik | Общие вопросы .NET | 4 | 22.12.2007 17:51 |
Код ехе файла | Micha | Общие вопросы Delphi | 4 | 09.10.2007 18:06 |
Значок ехе! | KORT | Общие вопросы Delphi | 3 | 19.07.2007 13:14 |
Источник: www.programmersforum.ru
Как поменять иконку проека в Delphi ?
Как поменять значок программы в делфи
. для немедленной перерисовки.
Изменять иконку приложения или окна во время его работы
Изменять иконку приложения или окна достаточно просто — для этого у TApplication и TForm предусмотрено свойство Icon. Смена иконки может вестись обычным присвоением свойству Icon нового значения:
delphi |
Form1.Icon := Image1.Picture.Icon; |
При этом происходит не присвоение указателя (как казалось бы), а копирование данных посредством вызова Assign, который производится в методе TForm.SetIcon
Загрузка производится типовым вызовом API:
delphi |
Form1.Icon.Handle := LoadIcon(hInstance, ‘имя иконки в ресурсе’ ); |
Причем имя в ресурсе желательно писать всегда в верхнем регистре
Все сказанное выше пригодно и для приложения, только в этом случае вместо Form1 выступает Application. Для принудительной перерисовки кнопки приложения в панеле задач можно применить вызов
delphi |
InvalidateRect(Application.Handle, nil , True ); |
delphi |
procedure TForm1.Timer1Timer(Sender: TObject ); begin inc (IconIndex); case IconIndex of 1 : Application.Icon.Assign(Image1.Picture.Icon); 2 : Application.Icon.Assign(Image2.Picture.Icon); else IconIndex := 0 ; end ; InvalidateRect(Application.Handle, nil , True ); end ; |
При этом естественно предполагается, что в Image1 и Image2 загружены иконки.
Для этого достаточно текущее разрешение экрана и в соответствии с ним изменить дескриптор иконки приложения. Естественно, что Вам придется создать в ресурсах новые иконки.
Поместите следующий код в файл проекта (.DPR) Вашего приложения:
delphi |
Application.Initialize; Application.CreateForm(TForm1, Form1); case GetDeviceCaps(GetDC(Form1.Handle), HORZRES) of 640 : Application.Icon.Handle := LoadIcon (hInstance, ‘ICON640’ ); 800 : Application.Icon.Handle := LoadIcon (hInstance, ‘ICON800’ ); 1024 : Application.Icon.Handle := LoadIcon (hInstance, ‘ICON1024’ ); 1280 : Application.Icon.Handle := LoadIcon (hInstance, ‘ICON1280’ ); end ; Application.Run; |
Источник: desksoft.ru
Как заменить иконку в программе Delphi и иконку скомпилированного файла?
Как заменить иконку в программе и иконку скомпилированного файла? Сейчас я хочу рассказать раз и навсегда как легко и быстро это сделать.
Для начала заменим иконку в программе (рис.1). Открываем Delphi. Создаем новый или открываем имеющийся проект, выбираем форму (Form) и в Инспекторе объектов (Object Inspector) находим строчку Icon. Жмем на кнопку с тремя точками и выбираем нужную иконку.
Так с заменой иконки в программе разобрались теперь перейдем к замене иконки в скомпилированном файле (exe’шнике). В главном меню выбираем Project => Options или нажимаем комбинацию клавиш Shift+Ctrl+F11. В открывшимся окне переходим на вкладку Applicaton, давим на кнопку Load Icon и выбираем нужную иконку.
Легко и просто, не правда ли, остается только посоветовать вам отличную программу для создания красивых иконок, которой пользуюсь я сам: AWIcons
Ссылки по теме
- Купить программу Delphi XE2 Professional
- Задать вопрос ONLine по покупке программ в интернет магазине ITShop
07.2012 | ||
Источник: www.interface.ru |