|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
21.07.2010, 22:44 | #1 |
Форумчанин
Регистрация: 21.04.2008
Сообщений: 175
|
конвертировать bmp в ico.
как можно конвертировать bmp изображение (загруженное в image) бес потери цветов в ico(иконку)
|
22.07.2010, 01:03 | #2 |
Участник клуба
Регистрация: 29.09.2008
Сообщений: 1,234
|
предлагаю грузить в TImageList, а там можно сохранить в ico. вроде без потерь
|
22.07.2010, 02:44 | #3 |
Студент, не
Старожил
Регистрация: 29.01.2009
Сообщений: 2,067
|
I am the First of Cyber Evolution...
I am the First to Program your Future... |
22.07.2010, 02:52 | #4 |
Заблокирован
Регистрация: 22.07.2010
Сообщений: 1
|
процедура сохранение в ico
Код:
|
22.07.2010, 14:55 | #5 |
Участник клуба
Регистрация: 12.08.2008
Сообщений: 1,977
|
Как пример - преобразовываем BMP в ICO:
(почему-то нет тега "код"). Куда пропал? Код: ........................ type TForm1 = class(TForm) Button1: TButton; procedure FormCreate(Sender: TObject); procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; BitBuf: TBitMap; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin BitBuf:= TBitMap.Create; BitBuf.LoadFromFile('1.bmp'); end; procedure TForm1.Button1Click(Sender: TObject); begin BitBuf.SaveToFile('1.ico'); end; end. На форму "бросьте" кнопку Button1, в папку с проектом - файл BMP (как пример - 1.bmp) для преобразования в иконку (32 х 32 pixels).
И не сомневайся даже ... отдых - кайф, работа - лажа!
Последний раз редактировалось DeKot; 22.07.2010 в 14:58. |
22.07.2010, 21:43 | #6 |
Форумчанин
Регистрация: 21.04.2008
Сообщений: 175
|
качество всеравно падает. да и ктамуже нет прозрачного фона. нужно сохранить как нормальную полноценную ico
|
22.07.2010, 22:11 | #7 | |||
Участник клуба
Регистрация: 12.08.2008
Сообщений: 1,977
|
Цитата:
Цитата:
Цитата:
И не сомневайся даже ... отдых - кайф, работа - лажа!
|
|||
23.07.2010, 11:26 | #8 | |||
Форумчанин
Регистрация: 21.04.2008
Сообщений: 175
|
Цитата:
Цитата:
Цитата:
|
|||
23.07.2010, 17:04 | #9 | |||
Студент, не
Старожил
Регистрация: 29.01.2009
Сообщений: 2,067
|
Цитата:
Цитата:
Цитата:
А вы вообще видели что в 3-м и 4-м постах написано? =\\
I am the First of Cyber Evolution...
I am the First to Program your Future... |
|||
23.07.2010, 19:24 | #10 |
Форумчанин
Регистрация: 21.04.2008
Сообщений: 175
|
з пост- если честно то непонял как его заточить под мои нужды. на с чет 4 поста - потеря качества.
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Bmp в ico | AngelOfDeath | Мультимедиа в Delphi | 9 | 30.12.2008 06:21 |
PSD в ICO | vinni | Мультимедиа в Delphi | 10 | 03.10.2008 16:52 |
Конвертация ICO в BMP | DeDoK | Общие вопросы Delphi | 5 | 15.07.2008 23:44 |
Ico | Zeraim | Мультимедиа в Delphi | 8 | 22.05.2008 09:11 |