unit DXFastBlt;
//
//
//  TDxFastBlt 用于處理32位真彩
//  真彩客戶端源碼QQ:442517066
//
//
interface
uses
  Windows, Graphics, DirectDraw;
type
  TDXBitMap = TObject;
const
  LibName = 'DxFastBlt.dll';
function TDxFastBlt_Create: TDXBitMap; stdcall;
procedure TDxFastBlt_Destroy(DXBitMap: TDXBitMap); stdcall;
function TDxFastBlt_GetWidth(DXBitMap: TDXBitMap): Integer; stdcall;
function TDxFastBlt_GetHeight(DXBitMap: TDXBitMap): Integer; stdcall;
procedure TDxFastBlt_SetWidth(DXBitMap: TDXBitMap; Value: Integer); stdcall;
procedure TDxFastBlt_SetHeight(DXBitMap: TDXBitMap; Value: Integer); stdcall;
function TDxFastBlt_Left(DXBitMap: TDXBitMap): PInteger; stdcall;
function TDxFastBlt_Top(DXBitMap: TDXBitMap): PInteger; stdcall;
function TDxFastBlt_Pitch(DXBitMap: TDXBitMap): Integer; stdcall;
function TDxFastBlt_GetPBits(DXBitMap: TDXBitMap): Pointer; stdcall;
procedure TDxFastBlt_SetPBits(DXBitMap: TDXBitMap; nPosition, nLen: Integer; Value: Pointer); stdcall;
function TDxFastBlt_ClientRect(DXBitMap: TDXBitMap): PRect; stdcall;
function TDxFastBlt_GetTransparentColor(DXBitMap: TDXBitMap): TColor; stdcall;
procedure TDxFastBlt_SetTransparentColor(DXBitMap: TDXBitMap; Value: TColor); stdcall;
function TDxFastBlt_GetPixels(DXBitMap: TDXBitMap; X, Y: Integer): Cardinal; stdcall;
procedure TDxFastBlt_SetPixels(DXBitMap: TDXBitMap; X, Y: Integer; Value: Cardinal); stdcall;
procedure TDxFastBlt_LoadFromFile(DXBitMap: TDXBitMap; FileName: PChar); stdcall;
procedure TDxFastBlt_SaveToFile(DXBitMap: TDXBitMap; FileName: PChar); stdcall;
procedure TDxFastBlt_FrameRectA(DXBitMap: TDXBitMap; Rect: TRect; Color: TColor); stdcall;
procedure TDxFastBlt_FrameRectB(DXBitMap: TDXBitMap; Left, Top, Width, Height: Integer; Color: TColor); stdcall;
procedure TDxFastBlt_FrameRectAlpha(DXBitMap: TDXBitMap; Rect: TRect; Color: TColor; Alpha: Byte); stdcall;
procedure TDxFastBlt_FillRectA(DXBitMap: TDXBitMap; Rect: TRect; Color: TColor); stdcall;
procedure TDxFastBlt_FillRectAlpha(DXBitMap: TDXBitMap; Rect: TRect; Color: TColor; Alpha: Byte); stdcall;
procedure TDxFastBlt_FillRectB(DXBitMap: TDXBitMap; Left, Top, Width, Height: Integer; Color: TColor); stdcall;
procedure TDxFastBlt_Fill(DXBitMap: TDXBitMap; Color: TColor); stdcall;
procedure TDxFastBlt_RectangleA(DXBitMap: TDXBitMap; Left, Top, Width, Height: Integer; ColorLine, ColorFill: TColor); stdcall;
procedure TDxFastBlt_RectangleB(DXBitMap: TDXBitMap; Rect: TRect; ColorLine, ColorFill: TColor); stdcall;
procedure TDxFastBlt_RectangleAlphaA(DXBitMap: TDXBitMap; Left, Top, Width, Height: Integer; ColorLine, ColorFill: TColor); stdcall;
procedure TDxFastBlt_RectangleAlphaB(DXBitMap: TDXBitMap; Rect: TRect; ColorLine, ColorFill: TColor); stdcall;
procedure TDxFastBlt_RotateA(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_RotateB(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_RotateC(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_RotateD(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_RotateE(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_RotateColorA(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real; Color: TColor); stdcall;
procedure TDxFastBlt_RotateColorB(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real; Color: TColor); stdcall;
procedure TDxFastBlt_RotateColorC(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real; Color: TColor); stdcall;
procedure TDxFastBlt_RotateColorD(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real; Color: TColor); stdcall;
procedure TDxFastBlt_RotateColorE(Src, Dest: TDXBitMap; X, Y, Angle: Integer; Scale: Real; Color: TColor); stdcall;
procedure TDxFastBlt_DrawA(Src, Dest: TDXBitMap; X, Y: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_DrawB(Src, Dest: TDXBitMap; X, Y: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_DrawC(Src, Dest: TDXBitMap; X, Y: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_DrawD(Src, Dest: TDXBitMap; X, Y: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_DrawE(Src, Dest: TDXBitMap; X, Y: Integer; Scale: Real); stdcall;
procedure TDxFastBlt_DrawRectA(Src, Dest: TDXBitMap; X, Y: Integer; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawRectB(Src, Dest: TDXBitMap; X, Y: Integer; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawRectC(Src, Dest: TDXBitMap; X, Y: Integer; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawRectD(Src, Dest: TDXBitMap; X, Y: Integer; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawRectE(Src, Dest: TDXBitMap; X, Y: Integer; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawAlpha(Src, Dest: TDXBitMap; X, Y: Integer; Alpha: Byte; Scale: Real); stdcall;
procedure TDxFastBlt_DrawRectAlpha(Src, Dest: TDXBitMap; X, Y: Integer; Rect: TRect; Scale: Real; Alpha: Byte); stdcall;
procedure TDxFastBlt_DrawColorA(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorB(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorC(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorD(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorE(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorAlpha(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Alpha: Byte; Scale: Real); stdcall;
procedure TDxFastBlt_DrawRectColorAlpha(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Rect: TRect; Alpha: Byte; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorRectA(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorRectB(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorRectC(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorRectD(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawColorRectE(Src, Dest: TDXBitMap; X, Y: Integer; Color: TColor; Rect: TRect; Scale: Real); stdcall;
procedure TDxFastBlt_DrawOnSurfaceA(DXBitMap: TDXBitMap; Surface: TDDSurfaceDesc; DownToUp: Boolean); stdcall;
procedure TDxFastBlt_DrawOnSurfaceB(DXBitMap: TDXBitMap; Surface: TDDSurfaceDesc2; DownToUp: Boolean); stdcall;
implementation
function TDxFastBlt_Create; external LibName Name 'TDxFastBlt_Create';
procedure TDxFastBlt_Destroy; external LibName Name 'TDxFastBlt_Destroy';
function TDxFastBlt_GetWidth; external LibName Name 'TDxFastBlt_GetWidth';
function TDxFastBlt_GetHeight; external LibName Name 'TDxFastBlt_GetHeight';
procedure TDxFastBlt_SetWidth; external LibName Name 'TDxFastBlt_SetWidth';
procedure TDxFastBlt_SetHeight; external LibName Name 'TDxFastBlt_SetHeight';
function TDxFastBlt_Left; external LibName Name 'TDxFastBlt_Left';
function TDxFastBlt_Top; external LibName Name 'TDxFastBlt_Top';
function TDxFastBlt_Pitch; external LibName Name 'TDxFastBlt_Pitch';
function TDxFastBlt_GetPBits; external LibName Name 'TDxFastBlt_GetPBits';
procedure TDxFastBlt_SetPBits; external LibName Name 'TDxFastBlt_SetPBits';
function TDxFastBlt_ClientRect; external LibName Name 'TDxFastBlt_ClientRect';
function TDxFastBlt_GetTransparentColor; external LibName Name 'TDxFastBlt_GetTransparentColor';
procedure TDxFastBlt_SetTransparentColor; external LibName Name 'TDxFastBlt_SetTransparentColor';
function TDxFastBlt_GetPixels; external LibName Name 'TDxFastBlt_GetPixels';
procedure TDxFastBlt_SetPixels; external LibName Name 'TDxFastBlt_SetPixels';
procedure TDxFastBlt_LoadFromFile; external LibName Name 'TDxFastBlt_LoadFromFile';
procedure TDxFastBlt_SaveToFile; external LibName Name 'TDxFastBlt_SaveToFile';
procedure TDxFastBlt_FrameRectA; external LibName Name 'TDxFastBlt_FrameRectA';
procedure TDxFastBlt_FrameRectB; external LibName Name 'TDxFastBlt_FrameRectB';
procedure TDxFastBlt_FrameRectAlpha; external LibName Name 'TDxFastBlt_FrameRectAlpha';
procedure TDxFastBlt_FillRectA; external LibName Name 'TDxFastBlt_FillRectA';
procedure TDxFastBlt_FillRectAlpha; external LibName Name 'TDxFastBlt_FillRectAlpha';
procedure TDxFastBlt_FillRectB; external LibName Name 'TDxFastBlt_FillRectB';
procedure TDxFastBlt_Fill; external LibName Name 'TDxFastBlt_Fill';
procedure TDxFastBlt_RectangleA; external LibName Name 'TDxFastBlt_RectangleA';
procedure TDxFastBlt_RectangleB; external LibName Name 'TDxFastBlt_RectangleB';
procedure TDxFastBlt_RectangleAlphaA; external LibName Name 'TDxFastBlt_RectangleAlphaA';
procedure TDxFastBlt_RectangleAlphaB; external LibName Name 'TDxFastBlt_RectangleAlphaB';
procedure TDxFastBlt_RotateA; external LibName Name 'TDxFastBlt_RotateA';
procedure TDxFastBlt_RotateB; external LibName Name 'TDxFastBlt_RotateB';
procedure TDxFastBlt_RotateC; external LibName Name 'TDxFastBlt_RotateC';
procedure TDxFastBlt_RotateD; external LibName Name 'TDxFastBlt_RotateD';
procedure TDxFastBlt_RotateE; external LibName Name 'TDxFastBlt_RotateE';
procedure TDxFastBlt_RotateColorA; external LibName Name 'TDxFastBlt_RotateColorA';
procedure TDxFastBlt_RotateColorB; external LibName Name 'TDxFastBlt_RotateColorB';
procedure TDxFastBlt_RotateColorC; external LibName Name 'TDxFastBlt_RotateColorC';
procedure TDxFastBlt_RotateColorD; external LibName Name 'TDxFastBlt_RotateColorD';
procedure TDxFastBlt_RotateColorE; external LibName Name 'TDxFastBlt_RotateColorE';
procedure TDxFastBlt_DrawA; external LibName Name 'TDxFastBlt_DrawA';
procedure TDxFastBlt_DrawB; external LibName Name 'TDxFastBlt_DrawB';
procedure TDxFastBlt_DrawC; external LibName Name 'TDxFastBlt_DrawC';
procedure TDxFastBlt_DrawD; external LibName Name 'TDxFastBlt_DrawD';
procedure TDxFastBlt_DrawE; external LibName Name 'TDxFastBlt_DrawE';
procedure TDxFastBlt_DrawRectA; external LibName Name 'TDxFastBlt_DrawRectA';
procedure TDxFastBlt_DrawRectB; external LibName Name 'TDxFastBlt_DrawRectB';
procedure TDxFastBlt_DrawRectC; external LibName Name 'TDxFastBlt_DrawRectC';
procedure TDxFastBlt_DrawRectD; external LibName Name 'TDxFastBlt_DrawRectD';
procedure TDxFastBlt_DrawRectE; external LibName Name 'TDxFastBlt_DrawRectE';
procedure TDxFastBlt_DrawAlpha; external LibName Name 'TDxFastBlt_DrawAlpha';
procedure TDxFastBlt_DrawRectAlpha; external LibName Name 'TDxFastBlt_DrawRectAlpha';
procedure TDxFastBlt_DrawColorA; external LibName Name 'TDxFastBlt_DrawColorA';
procedure TDxFastBlt_DrawColorB; external LibName Name 'TDxFastBlt_DrawColorB';
procedure TDxFastBlt_DrawColorC; external LibName Name 'TDxFastBlt_DrawColorC';
procedure TDxFastBlt_DrawColorD; external LibName Name 'TDxFastBlt_DrawColorD';
procedure TDxFastBlt_DrawColorE; external LibName Name 'TDxFastBlt_DrawColorE';
procedure TDxFastBlt_DrawColorAlpha; external LibName Name 'TDxFastBlt_DrawColorAlpha';
procedure TDxFastBlt_DrawRectColorAlpha; external LibName Name 'TDxFastBlt_DrawRectColorAlpha';
procedure TDxFastBlt_DrawColorRectA; external LibName Name 'TDxFastBlt_DrawColorRectA';
procedure TDxFastBlt_DrawColorRectB; external LibName Name 'TDxFastBlt_DrawColorRectB';
procedure TDxFastBlt_DrawColorRectC; external LibName Name 'TDxFastBlt_DrawColorRectC';
procedure TDxFastBlt_DrawColorRectD; external LibName Name 'TDxFastBlt_DrawColorRectD';
procedure TDxFastBlt_DrawColorRectE; external LibName Name 'TDxFastBlt_DrawColorRectE';
procedure TDxFastBlt_DrawOnSurfaceA; external LibName Name 'TDxFastBlt_DrawOnSurfaceA';
procedure TDxFastBlt_DrawOnSurfaceB; external LibName Name 'TDxFastBlt_DrawOnSurfaceB';

end.