From 13cb137a99dcc9af6065f4cfbf151a7cda591323 Mon Sep 17 00:00:00 2001 From: paul Date: Thu, 10 Mar 2011 06:35:10 +0000 Subject: [PATCH] win32: formatting, cleanup git-svn-id: trunk@29780 - --- lcl/interfaces/win32/win32callback.inc | 7 ++++--- lcl/interfaces/win32/win32wsmenus.pp | 2 +- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/lcl/interfaces/win32/win32callback.inc b/lcl/interfaces/win32/win32callback.inc index e94504782a..d32417ffdb 100644 --- a/lcl/interfaces/win32/win32callback.inc +++ b/lcl/interfaces/win32/win32callback.inc @@ -318,9 +318,10 @@ var MenuInfo.fMask := MIIM_DATA; MainMenuHandle := GetMenuParent(HMENU(WParam), GetMenu(Window)); - if GetMenuItemInfo(MainMenuHandle, LOWORD(LParam), true, @MenuInfo) - then Result := TObject(MenuInfo.dwItemData) - else Result := nil; + if GetMenuItemInfo(MainMenuHandle, LOWORD(LParam), true, @MenuInfo) then + Result := TObject(MenuInfo.dwItemData) + else + Result := nil; end; function GetMenuItemObject(ByPosition: Boolean): TObject; diff --git a/lcl/interfaces/win32/win32wsmenus.pp b/lcl/interfaces/win32/win32wsmenus.pp index 509e987d3e..03dbcfc0f1 100644 --- a/lcl/interfaces/win32/win32wsmenus.pp +++ b/lcl/interfaces/win32/win32wsmenus.pp @@ -1450,7 +1450,7 @@ const ); begin MenuHandle := APopupMenu.Handle; - AppHandle := TWin32WidgetSet(WidgetSet).AppHandle; + AppHandle := Win32WidgetSet.AppHandle; GetWin32WindowInfo(AppHandle)^.PopupMenu := APopupMenu; TrackPopupMenuEx(MenuHandle, lAlignment[APopupMenu.Alignment, APopupMenu.IsRightToLeft] or lTrackButtons[APopupMenu.TrackButton],