mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-07 18:40:41 +02:00
MG: added graphics extensions from Andrew Johnson
git-svn-id: trunk@1085 -
This commit is contained in:
parent
f021a7cb91
commit
30cec09ad4
@ -29,6 +29,12 @@ begin
|
||||
Result := false;
|
||||
end;
|
||||
|
||||
function TInterfaceBase.AngleChord(DC: HDC;
|
||||
x,y,width,height,angle1,angle2 : Integer): Boolean;
|
||||
begin
|
||||
Result:=false;
|
||||
end;
|
||||
|
||||
function TInterfaceBase.BitBlt(DestDC: HDC; X, Y, Width, Height: Integer; SrcDC: HDC; XSrc, YSrc: Integer; Rop: DWORD): Boolean;
|
||||
begin
|
||||
Result := False;
|
||||
@ -621,6 +627,9 @@ end;
|
||||
{ =============================================================================
|
||||
|
||||
$Log$
|
||||
Revision 1.37 2002/08/08 18:05:46 lazarus
|
||||
MG: added graphics extensions from Andrew Johnson
|
||||
|
||||
Revision 1.36 2002/08/08 17:26:37 lazarus
|
||||
MG: added property TMenuItems.RightJustify
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user