paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-02 20:07:15 +01:00
Code Issues Packages Projects Releases Wiki Activity

fpgui intf: fixes from Graeme

Browse Source 
git-svn-id: trunk@31316 -
This commit is contained in:
mattias 2011-06-21 13:14:04 +00:00
parent b5f6809d74
commit 8c5c123c5d
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/fpgui/fpguiobject.inc
View File

@ -91,7 +91,7 @@ var
ControlType: Cardinal;
ControlStyle: Cardinal;
fpgRect: TfpgRect;
Style: TFButtonFlags;
Style: TfpgButtonFlags;
(*
DFC_CAPTION = $01;
DFC_MENU = $02;

2
lcl/interfaces/fpgui/fpguiwsprivate.pp
View File

@ -746,7 +746,7 @@ begin
// WidgetProtected.OnKeyPress := KeyHandler;
// WidgetProtected.OnMouseEnter := MouseEnterHandler;
// WidgetProtected.OnMouseExit := MouseExitHandler;
WidgetProtected.OnPaint := PaintHandler;
// WidgetProtected.OnPaint := PaintHandler;
// WidgetProtected.OnMouseMove := MouseMoveHandler;
//WidgetProtected.OnMove := MoveHandler;