请问如何把一个小的bmp(32 X 32)做成.ico文件?(用程序实现)(100分)

大

大米

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-02-05

• #1

请大虾门指点

 

P

pegasus

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-02-05

• #2

这个吗，把文件头做一下格式变换就差不多啦！,

 

L

lhz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-02-05

• #3

CreateIconIndirect可以接受HBITMAP作为其AND和XOR平面

 

D

delphi fan2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-02-05

• #4

用Tbitmap和Ticon做个转化！

 

C

chenke

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-02-06

• #5

ico -> bmp easy,因为bmp有canvas,
bmp ->ico :-(

 

草

草动

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-02-07

• #6

这样转换就行了!
uses ShellAPI;

OpenDialog1.Execute;
with Image1.Picture do
begin
Width:=32; Height:=32;
Icon.Handle:=
Extracticon(Hinstance,@OpenDialog1.FileName[1],0);
SavetoFile('C:/frombmp.ico');
end;

 

大

大米

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-02-08

• #7

接受答案了.