paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-13 12:26:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

- Removed nested comments which were causing compiler warnings.

Browse Source 
git-svn-id: trunk@24176 -
This commit is contained in:
sergei 2013-04-07 12:06:01 +00:00
parent 77e2d443d4
commit 747342ebb2
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/win/wininc/func.inc
View File

@ -1286,14 +1286,14 @@ function GetMenuBarInfo(_hwnd:HWND; idObject:longint; idItem:longint; pmbi:LPMEN
function Internal_MenuItemFromPoint(hWnd:HWND; hMenu:HMENU; ptScreenX, ptScreenY : LONG):longint; external 'user32' name 'MenuItemFromPoint';
function MenuItemFromPoint(hWnd:HWND; hMenu:HMENU; ptScreen:POINT):longint; {external 'user32' name 'MenuItemFromPoint';}
function MenuItemFromPoint(hWnd:HWND; hMenu:HMENU; ptScreen:POINT):longint;
begin
MenuItemFromPoint:=Internal_MenuItemFromPoint(hWnd, hMenu, ptScreen.X, ptScreen.Y);
end;
function Internal_DragDetect(hwnd:HWND; ptX, ptY : LONG):WINBOOL; external 'user32' name 'DragDetect';
function DragDetect(hwnd:HWND; pt:POINT):WINBOOL; {external 'user32' name 'DragDetect';}
function DragDetect(hwnd:HWND; pt:POINT):WINBOOL;
begin
DragDetect:=Internal_DragDetect(hWnd, pt.X, pt.Y);
end;
@ -1333,7 +1333,7 @@ end;
function Internal_LBItemFromPt(hLB:HWND; ptX, ptY : LONG; bAutoScroll:WINBOOL):longint; external 'comctl32' name 'LBItemFromPt';
function LBItemFromPt(hLB:HWND; pt:POINT; bAutoScroll:WINBOOL):longint; { external 'comctl32' name 'LBItemFromPt';}
function LBItemFromPt(hLB:HWND; pt:POINT; bAutoScroll:WINBOOL):longint;
begin
LBItemFromPt:=Internal_LBItemFromPt(hLB, pt.X, pt.Y, bAutoScroll);
end;