关于Image的一个有关问题。
关于Image的一个问题。。Delphi(Pascal) codevarnewbmp: TBitmapi,bmpheight,bmpwidth:integerbeginnewbmp
关于Image的一个问题。。
Delphi(Pascal) codevarnewbmp: TBitmap;i,bmpheight,bmpwidth:integer;beginnewbmp:= TBitmap.Create;newbmp.LoadFromFile('RES\002.bmp');Image1.Height:=newbmp.Height;image1.Canvas.Draw(0,0,newbmp);bmpheight:=newbmp.Height;newbmp.LoadFromFile('RES\003.bmp');Image1.Height:=Image1.Height+newbmp.Height;image1.Canvas.Draw(0,bmpheight,newbmp);
上面这段代码为什么第二张图片显示不出来啊?当我把Image的高设置的足够大时两张图片能显示(也就是不设置Image的高的时候),但是如果我想根据图片的大小来改变Image的高的时候,第二张图片就显示不出来。。。
[解决办法]可能应该在OnPaint中再画一次。
[解决办法]LZ 说的是002 显示不出来,还是003显示不出来?
[解决办法]在代码里动态修改Image的尺寸的时候需要重新初始化Image里面的Picture。
[解决办法]先获得2张图片的高度后,再设置Image的高度1,再分别绘上去