mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-17 22:59:15 +02:00
symmetry getdesignerdc, releasedesignerdc
git-svn-id: trunk@4774 -
This commit is contained in:
parent
f0b5c03d21
commit
8bf74c83fb
@ -2057,7 +2057,7 @@ begin
|
||||
DDC.SetDC(Form,DesignerDC);
|
||||
DoPaintDesignerItems;
|
||||
DDC.Clear;
|
||||
ReleaseDC(Form.Handle,DesignerDC);
|
||||
ReleaseDesignerDC(Form.Handle,DesignerDC);
|
||||
end;
|
||||
|
||||
procedure TDesigner.DoPaintDesignerItems;
|
||||
|
@ -1505,6 +1505,11 @@ begin
|
||||
Result := 0;
|
||||
end;
|
||||
|
||||
function TInterfaceBase.ReleaseDesignerDC(hWnd: HWND; DC: HDC): Integer;
|
||||
begin
|
||||
Result := ReleaseDC(hWnd, DC);
|
||||
end;
|
||||
|
||||
function TInterfaceBase.RestoreDC(DC: HDC; SavedDC: Integer): Boolean;
|
||||
begin
|
||||
Result := False;
|
||||
@ -1842,6 +1847,9 @@ end;
|
||||
{ =============================================================================
|
||||
|
||||
$Log$
|
||||
Revision 1.108 2003/11/07 18:48:52 micha
|
||||
symmetry getdesignerdc, releasedesignerdc
|
||||
|
||||
Revision 1.107 2003/11/03 22:37:41 mattias
|
||||
fixed vert scrollbar, implemented GetDesignerDC
|
||||
|
||||
|
@ -874,6 +874,11 @@ begin
|
||||
Result := InterfaceObject.ReleaseDC(hWnd, DC);
|
||||
end;
|
||||
|
||||
function ReleaseDesignerDC(hWnd: HWND; DC: HDC): Integer;
|
||||
begin
|
||||
Result := InterfaceObject.ReleaseDesignerDC(hWnd, DC);
|
||||
end;
|
||||
|
||||
Function RequestInput(const InputCaption, InputPrompt : String; MaskInput : Boolean; var Value : String) : Boolean;
|
||||
begin
|
||||
Result := InterfaceObject.RequestInput(InputCaption, InputPrompt, MaskInput, Value);
|
||||
@ -1687,6 +1692,9 @@ end;
|
||||
{ =============================================================================
|
||||
|
||||
$Log$
|
||||
Revision 1.101 2003/11/07 18:48:52 micha
|
||||
symmetry getdesignerdc, releasedesignerdc
|
||||
|
||||
Revision 1.100 2003/11/03 22:37:41 mattias
|
||||
fixed vert scrollbar, implemented GetDesignerDC
|
||||
|
||||
|
@ -247,6 +247,7 @@ function RectVisible(dc : hdc; const ARect: TRect) : Boolean; {$IFDEF IF_BASE_ME
|
||||
function RegroupMenuItem(hndMenu: HMENU; GroupIndex: integer): Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
|
||||
function ReleaseCapture : Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
|
||||
function ReleaseDC(hWnd: HWND; DC: HDC): Integer; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
|
||||
function ReleaseDesignerDC(hWnd: HWND; DC: HDC): Integer; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
|
||||
function RestoreDC(DC: HDC; SavedDC: Integer): Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
|
||||
function RightJustifyMenuItem(HndMenu: HMenu; bRightJustify: boolean): Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
|
||||
Function RoundRect(DC : hDC; X1, Y1, X2, Y2: Integer; RX,RY : Integer): Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
|
||||
@ -399,6 +400,9 @@ procedure RaiseLastOSError;
|
||||
{ =============================================================================
|
||||
|
||||
$Log$
|
||||
Revision 1.91 2003/11/07 18:48:52 micha
|
||||
symmetry getdesignerdc, releasedesignerdc
|
||||
|
||||
Revision 1.90 2003/11/03 22:37:41 mattias
|
||||
fixed vert scrollbar, implemented GetDesignerDC
|
||||
|
||||
|
@ -137,6 +137,7 @@ Function Rectangle(DC: HDC; X1, Y1, X2, Y2: Integer): Boolean; Override;
|
||||
function RectVisible(dc : hdc; const ARect: TRect) : Boolean; Override;
|
||||
Function ReleaseCapture: Boolean; Override;
|
||||
Function ReleaseDC(HWnd: HWND; DC: HDC): Integer; Override;
|
||||
Function ReleaseDesignerDC(HWnd: HWND; DC: HDC): Integer; Override;
|
||||
Function RestoreDC(DC: HDC; SavedDC: Integer): Boolean; Override;
|
||||
|
||||
Function SaveDC(DC: HDC): Integer; Override;
|
||||
@ -181,6 +182,9 @@ Procedure DeleteCriticalSection(var CritSection: TCriticalSection); Override;
|
||||
{ =============================================================================
|
||||
|
||||
$Log$
|
||||
Revision 1.37 2003/11/07 18:48:52 micha
|
||||
symmetry getdesignerdc, releasedesignerdc
|
||||
|
||||
Revision 1.36 2003/11/04 13:18:22 micha
|
||||
Implement GetDesignerDC
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user