bitblt_bitblt stretchblt_bitblt中源设备的像素(17)

function DrawDibRealize(hdd: hDrawDib; hDC: THandle; fBackground: Bool): UInt; stdcall;

function DrawDibSetPalette(hdd: hDrawDib; hpal: THandle): Boolean; stdcall;

function DrawDibStart(hdd: hDrawDib; rate: LongInt): Boolean; stdcall;

function DrawDibStop(hdd: hDrawDib): Boolean; stdcall;

function DrawDibTime(hdd: hDrawDib; var lpddtime: TDrawDibTime): Boolean; stdcall;

implementation

const

DLL = 'MsVfW32.dll';

function DrawDibBegin; external DLL name 'DrawDibBegin';

function DrawDibChangePalette; external DLL name 'DrawDibChangePalette';

function DrawDibClose; external DLL name 'DrawDibClose';

function DrawDibDraw; external DLL name 'DrawDibDraw';

function DrawDibEnd; external DLL name 'DrawDibEnd';

function DrawDibGetBuffer; external DLL name 'DrawDibGetBuffer';

function DrawDibGetPalette; external DLL name 'DrawDibGetPalette';

function DrawDibOpen; external DLL name 'DrawDibOpen';

function DrawDibProfileDisplay; external DLL name 'DrawDibProfileDisplay';

function DrawDibRealize; external DLL name 'DrawDibRealize';

function DrawDibSetPalette; external DLL name 'DrawDibSetPalette';

function DrawDibStart; external DLL name 'DrawDibStart';

function DrawDibStop; external DLL name 'DrawDibStop';

function DrawDibTime; external DLL name 'DrawDibTime';

end.

--------------B04D41ED428BD1DFBB24A362--

var

hdd :THandle;

dc :HDC;

begin

hdd := DrawDibOpen; //打开Draw句柄

dc := GetDC(Form1.Handle); //读取显示句柄

if DrawDibDraw(hdd,

dc,

left, //原图像

top,

width,

height,

@bmih, //原图像头信息结构

@data, //原图像数据

left, //显示

top,

width,

height,

Flag //标志

);

收藏

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-27468-17.html