Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.06;
Скачать: CL | DM;

Вниз

Конвентирование bmp в ico   Найти похожие ветки 

 
Romka ©   (2003-09-25 12:45) [0]

Привет!
У меня такой вопрос:
Как можно в Делфи конвентировать bmp файл в ico.
Заране благодарен!!!


 
ZEE ©   (2003-09-25 13:05) [1]

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988625276&n=21


 
Romka ©   (2003-09-25 15:04) [2]

A по проще че нибудь есть? Или объясни пожалуйста как она работает и как мне ее применить: У меня Картинка bmp загружается
в Image1, как мне ее конвертировать в ico, записать ее содержимое в переменную и открыть в другом image2.


 
ZEE ©   (2003-09-25 15:13) [3]

> Romka © (25.09.03 15:04) [2]
> A по проще че нибудь есть?
может быть, но я знаю только такой способ

> Или объясни пожалуйста как она
> работает и как мне ее применить: У меня Картинка bmp загружается
> в Image1, как мне ее конвертировать в ico, записать ее содержимое
> в переменную и открыть в другом image2.
ну там же как раз пример, а не теория - попробуй тот вариант, а патом переделай его под свои нужды...


 
Chlavik ©   (2003-09-25 15:15) [4]

У меня пашет и так ( конечно не уверен что это полностью правильно...)

function ConvertBmpToIco(Bmp:TBitmap):HIcon;
var IconInfo : TIconInfo;
begin
IconInfo.fIcon:= true;
IconInfo.xHotspot:= 0;
IconInfo.yHotspot:= 0;
IconInfo.hbmMask:=Bmp.MaskHandle;
IconInfo.hbmColor:=Bmp.Handle;
Result:= CreateIconIndirect(IconInfo);
end;

А потом в какойто процедуре
var icon:TIcon;
begin
Icon:=TIcon.Create;
Icon.Handle:=ConvertBmpToIco(TVoyImage.Picture.BitMap);
Form1.Canvas.Draw(Icon,10,10); // тут ты юзаеш иконкуж
Icon.ReleaseHandle;
Icon.Free;
end;



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

Текущий архив: 2003.10.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
6-18496
[SHS]MAD
2003-08-08 11:34
2003.10.06
Глюки с IP адресом


1-18427
62mkv
2003-09-25 11:13
2003.10.06
Как написать на Delphi 5 прогу для BDE 4 ?


3-18237
FFF
2003-09-16 12:44
2003.10.06
Привет всем!, уважаемые мастера помогите, как мне обработать


6-18493
spogi
2003-08-11 03:01
2003.10.06
клиент-сервер + сокеты...


3-18225
MJ
2003-09-16 23:16
2003.10.06
sql server