T
txiuq
Unregistered / Unconfirmed
GUEST, unregistred user!
delphi 5 中用如下代码(屏幕为800X600 32Bit 模式)
var
sDc:Hdc;
bmp:TBitmap;
begin
sDC:=GetDc(0);
bmp:=TBitmap.Create;
Bmp.Width:=800;
Bmp.Height:=600;
Bmp.PixlFormat:=pf32Bit;
Biblt(Bmp.Canvas.Handle,0,0,800,600,sDC,800,600,SRCCOPY);
//上面这句执行特慢(Win2000要160ms)，而在Win 98 中却快得多(25ms)
.....
end;
我的 CPU 为 赛扬II 450 MHZ
var
sDc:Hdc;
bmp:TBitmap;
begin
sDC:=GetDc(0);
bmp:=TBitmap.Create;
Bmp.Width:=800;
Bmp.Height:=600;
Bmp.PixlFormat:=pf32Bit;
Biblt(Bmp.Canvas.Handle,0,0,800,600,sDC,800,600,SRCCOPY);
//上面这句执行特慢(Win2000要160ms)，而在Win 98 中却快得多(25ms)
.....
end;
我的 CPU 为 赛扬II 450 MHZ