ImageList 动态添加时，bmp 怎样才能 Streth？ (100分)

B

bbcoll

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-18

• #1

我用ImageList 动态添加bmp时图片不能streth
我想把大图片用到listview里，
我用stream的形式读到位图里
请问怎么解决这个问题让图片在imagelist里Streth？

 

T

terry_lzs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #2

我也遇到这个问题了，借宝地听听。

 

O

OpuBF

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #3

Stretch??? 将ImageList的Width和Height设置为足够大将图片存入不就行了吗，然后
在绘制时用StretchDraw....

 

L

liao6373

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #4

试试这个方法：
procedure TForm1.Button1Click(Sender: TObject);
var
Bitmap,ABitmap: TBitmap;
begin
Bitmap := TBitmap.Create;
Bitmap.LoadFromFile('F:/1.bmp');
ABitmap := TBitmap.Create;
ABitmap.Canvas.StretchDraw(Rect(0,0,ImageList1.Width,ImageList1.Height),Bitmap);
ImageList1.Add(ABitmap,nil);
end;

 

B

bbcoll

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-23

• #5

多人接受答案了。