paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-19 14:20:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

SetCapture uses HWND as parameter and result type

Browse Source 
git-svn-id: trunk@6753 -
This commit is contained in:
vincents 2005-02-05 20:40:17 +00:00
parent 7c3a95c570
commit 83209bfba5
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/win32/win32winapi.inc
View File

@ -2640,7 +2640,7 @@ End;
Sets the mouse capture to the specified window. Sets the mouse capture to the specified window.
------------------------------------------------------------------------------} ------------------------------------------------------------------------------}
Function TWin32WidgetSet.SetCapture(Value: LongInt): LongInt; Function TWin32WidgetSet.SetCapture(Value: HWND): HWND;
Begin Begin
Assert(False, Format('Trace:> [TWin32WidgetSet.SetCapture] 0x%x', [Value])); Assert(False, Format('Trace:> [TWin32WidgetSet.SetCapture] 0x%x', [Value]));
Result := Windows.SetCapture(Value); Result := Windows.SetCapture(Value);
@ -3077,6 +3077,9 @@ end;
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.135 2005/02/05 20:40:17 vincents
SetCapture uses HWND as parameter and result type
Revision 1.134 2005/02/05 09:05:51 micha Revision 1.134 2005/02/05 09:05:51 micha
add platform independent winapi function IsWindowEnabled add platform independent winapi function IsWindowEnabled

5
lcl/interfaces/win32/win32winapih.inc
View File

@ -160,7 +160,7 @@ Function SendMessage(HandleWnd: HWND; Msg: Cardinal; WParam: WParam; LParam: LPa
function SetActiveWindow(Window: HWND): HWND; override; function SetActiveWindow(Window: HWND): HWND; override;
Function SetBkColor(DC: HDC; Color: TColorRef): TColorRef; Override; Function SetBkColor(DC: HDC; Color: TColorRef): TColorRef; Override;
Function SetBkMode(DC: HDC; BkMode: Integer): Integer; Override; Function SetBkMode(DC: HDC; BkMode: Integer): Integer; Override;
Function SetCapture(Value: LongInt): LongInt; Override; Function SetCapture(Value: HWND): HWND; Override;
Function SetCaretPos(X, Y: Integer): Boolean; Override; Function SetCaretPos(X, Y: Integer): Boolean; Override;
Function SetCaretPosEx(Handle: HWnd; X, Y: Integer): Boolean; Override; Function SetCaretPosEx(Handle: HWnd; X, Y: Integer): Boolean; Override;
Function SetCaretRespondToFocus(Handle: HWND; ShowHideOnFocus: Boolean): Boolean; Override; Function SetCaretRespondToFocus(Handle: HWND; ShowHideOnFocus: Boolean): Boolean; Override;
@ -194,6 +194,9 @@ Procedure DeleteCriticalSection(var CritSection: TCriticalSection); Override;
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.53 2005/02/05 20:40:17 vincents
SetCapture uses HWND as parameter and result type
Revision 1.52 2005/02/05 09:05:51 micha Revision 1.52 2005/02/05 09:05:51 micha
add platform independent winapi function IsWindowEnabled add platform independent winapi function IsWindowEnabled