X XU Xuebin Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-11 #1 把一批位图放在数组里,用循环处理,这样代码看起来顺眼些。请教各位大侠 !
R realLearning Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-11 #2 var bitmaparg : array of TBitmap setlength(bitmaparg,10) bitmaparg[0] := Tbitmap.Create; bitmaparg[0].loadfromfile
var bitmaparg : array of TBitmap setlength(bitmaparg,10) bitmaparg[0] := Tbitmap.Create; bitmaparg[0].loadfromfile
P peng_qs Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-11 #4 var bitmaparg : array of TBitmap; i : Integer; setlength(bitmaparg,BmpNum) for i := 0 to BmpNum-1 do begin bitmaparg := Tbitmap.Create; bitmaparg.loadfromfile(FileName+inttostr(i)); end; 不过这种做法很耗资源哦。
var bitmaparg : array of TBitmap; i : Integer; setlength(bitmaparg,BmpNum) for i := 0 to BmpNum-1 do begin bitmaparg := Tbitmap.Create; bitmaparg.loadfromfile(FileName+inttostr(i)); end; 不过这种做法很耗资源哦。
H huazai Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-11 #5 如果都是大图片…… 如果都是真彩色…… 如果你的内存small…… 如果…… 那么,不要这麽做!!!!!
Z zhuoyuesky Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-11 #6 用peng_qs的方法,最后别忘了for循环释放。