mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-06 21:57:56 +02:00
25 lines
577 B
PHP
25 lines
577 B
PHP
|
|
|
|
function CreateBitmapMask(BitmapDC: HDC; Width, Height: Integer; TransparentColor: TColor): HBITMAP;
|
|
begin
|
|
//todo
|
|
Result := 0;
|
|
end;
|
|
|
|
function DirectMaskBlt(DestDC: HDC; X, Y, Width, Height: Integer; SrcDC: HDC; XSrc, YSrc: Integer; Mask: HBITMAP): Boolean;
|
|
begin
|
|
//todo: see if is possible todo it faster
|
|
Result := StretchMaskBlt(DestDC, X, Y, Width, Height, SrcDC, XSrc, YSrc, Width, Height,
|
|
Mask, 0, 0, SRCCOPY);
|
|
end;
|
|
|
|
function OptimalPixelFormat: TPixelFormat;
|
|
begin
|
|
Result := pfDevice;
|
|
end;
|
|
|
|
function OSSupportsUTF16: Boolean;
|
|
begin
|
|
Result := False;
|
|
end;
|