SetCapture uses HWND as parameter and result type

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

View File

@ -2640,7 +2640,7 @@ End;
Sets the mouse capture to the specified window.
------------------------------------------------------------------------------}
Function TWin32WidgetSet.SetCapture(Value: LongInt): LongInt;
Function TWin32WidgetSet.SetCapture(Value: HWND): HWND;
Begin
Assert(False, Format('Trace:> [TWin32WidgetSet.SetCapture] 0x%x', [Value]));
Result := Windows.SetCapture(Value);
@ -3077,6 +3077,9 @@ end;
{ =============================================================================
$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
add platform independent winapi function IsWindowEnabled

View File

@ -160,7 +160,7 @@ Function SendMessage(HandleWnd: HWND; Msg: Cardinal; WParam: WParam; LParam: LPa
function SetActiveWindow(Window: HWND): HWND; override;
Function SetBkColor(DC: HDC; Color: TColorRef): TColorRef; 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 SetCaretPosEx(Handle: HWnd; X, Y: Integer): Boolean; Override;
Function SetCaretRespondToFocus(Handle: HWND; ShowHideOnFocus: Boolean): Boolean; Override;
@ -194,6 +194,9 @@ Procedure DeleteCriticalSection(var CritSection: TCriticalSection); Override;
{ =============================================================================
$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
add platform independent winapi function IsWindowEnabled