L
linuxee
Unregistered / Unconfirmed
GUEST, unregistred user!
我定义了一个位图数组:Map: array[0..5] of TBitmap;
并在formcreate中初始化
procedure TFormMain.FormCreate(Sender: TObject);
begin
。。。。。。。。
for n := 0 to 5 do
begin
Map[n] := TBitmap.Create;
ImageList1.GetBitmap(n, map[n]);
Map[n].PixelFormat := pf8bit;
// Map[n].Transparent:=true; [red]//这两行导致cpu使用率多了20%[/red]
// Map[n].TransparentColor:=clwhite;
end;
。。。
end;
并在一个timer事件中调用draw函数
draw函数中循环调用Draw(x, y, Map[index]);
设置Transparent的目的是消除位图的白色背景
在不设Transparent的情况下,cpu使用率为14%
设了Transparent后,就变成40%左右了!!
不知是何原因??
多谢指点!
并在formcreate中初始化
procedure TFormMain.FormCreate(Sender: TObject);
begin
。。。。。。。。
for n := 0 to 5 do
begin
Map[n] := TBitmap.Create;
ImageList1.GetBitmap(n, map[n]);
Map[n].PixelFormat := pf8bit;
// Map[n].Transparent:=true; [red]//这两行导致cpu使用率多了20%[/red]
// Map[n].TransparentColor:=clwhite;
end;
。。。
end;
并在一个timer事件中调用draw函数
draw函数中循环调用Draw(x, y, Map[index]);
设置Transparent的目的是消除位图的白色背景
在不设Transparent的情况下,cpu使用率为14%
设了Transparent后,就变成40%左右了!!
不知是何原因??
多谢指点!