Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Создание ICO из BMP с прозрачным фоном [D7, Win2k]

Страницы: < 1 2
Ольга © (2004-09-01 12:36:00)
Здравствуйте!
Подскажите, пожалуйста, можно ли в Дельфи создать из BMP-файла файл ICO С ПРОЗРАЧНЫМ ФОНОМ? ICO из BMP я сделала, а вот установить прозрачный фон у иконки никак не получается, т.е. мне нужно, чтоб прозрачный фон был уже "зашит" в файле ICO.

Anderson (2004-09-01 14:25:00) [21]
Поправлю себя: фон остается непрозрачным даже если пишешь: Iml.AddMasked(Image1.Picture.Bitmap,clРоховый\синий\или серо-буро-малиновый);

Ольга (2004-09-01 14:24:00) [22]
Конечно, Anderson © , я не против.

Anderson (2004-09-01 14:24:00) [23]
Вот-вот! Фон-то остается непрозрачным...а ошибка у меня не выскакивала...

Ольга (2004-09-01 14:22:00) [24]
а в чем изюминка?
в Iml.AddMasked(Image1.Picture.Bitmap,clWhite); ?
так ни фига! фон как был розовым, так и остался!

и плюс к тому ругается на Invalid image size

Anderson (2004-09-01 14:20:00) [25]
Не катит. Девушка имела не то ввиду. Вот, допустим, загружаешь ты в TImage картинку: например, машина на черном фоне. Она хочет убрать этот фон и сохранить эту BMP'шку, как иконку. Это значит, что, если, допустим, в Image1 находится эта картинка, то при вызывании Image1.Picture.Bitmap.SaveToFile('d:\icon.ico')в файл сохранялась иконка без заднего фона и БЕЗ потери цветового качества. У девушки эта иконка сохраняется БЕЗ потери качества, но фон остается, а её нужно от него избавиться.

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

grom (2004-09-01 13:54:00) [26]
программно можно так
procedure TForm1.Button1Click(Sender: TObject);
var
iml:TImageList;
begin
iml:=TImageList.CreateSize(32,32);
Iml.AddMasked(Image1.Picture.Bitmap,clWhite);
Iml.GetIcon(0,Image2.Picture.Icon);
Image2.Picture.SaveToFile('1.ico');
iml.Free;
end;

Anderson (2004-09-01 13:29:00) [27]
Во-во! Я тоже никак не могу это сделать. Кто ответит (легким способом) - тот будет просто героем в моих глазах. :-)

grom (2004-09-01 13:28:00) [28]
Mожет Image Editor подойдёт

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »