diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-08-20 15:08:43 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-08-20 15:08:43 +0000 |
commit | 7162ddf3447586b1255438ce4961119feaa5d9ef (patch) | |
tree | ac828813051f8c10a156c95b4f1dc6ae2fda8d56 /src/corelib | |
parent | 42213545425979cb84f66fd78ecf2336c373d81f (diff) | |
download | fpGUI-7162ddf3447586b1255438ce4961119feaa5d9ef.tar.xz |
* Added keyboard handling in PopupMenus.
* Improved the look of Popup Menus to look more 3D like Win2000.
* Fixed a bug where sub-sub menus didn't close when you selected a new top level menu.
Diffstat (limited to 'src/corelib')
-rw-r--r-- | src/corelib/fpgfx.pas | 2 | ||||
-rw-r--r-- | src/corelib/gfx_popupwindow.pas | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/corelib/fpgfx.pas b/src/corelib/fpgfx.pas index cda9a156..69396e58 100644 --- a/src/corelib/fpgfx.pas +++ b/src/corelib/fpgfx.pas @@ -855,7 +855,7 @@ begin fpgSetNamedFont('Grid', 'Arial-9'); fpgSetNamedFont('GridHeader', 'Arial-9:bold'); fpgSetNamedFont('Menu', FPG_DEFAULT_FONT_DESC); - fpgSetNamedFont('MenuAccel', FPG_DEFAULT_FONT_DESC + ':underline'); + fpgSetNamedFont('MenuAccel', FPG_DEFAULT_FONT_DESC + ':bold'); fpgSetNamedFont('MenuDisabled', FPG_DEFAULT_FONT_DESC); {$Note Refactor this so under Windows it can detect the system colors instead. diff --git a/src/corelib/gfx_popupwindow.pas b/src/corelib/gfx_popupwindow.pas index 5d933b5d..82e6f578 100644 --- a/src/corelib/gfx_popupwindow.pas +++ b/src/corelib/gfx_popupwindow.pas @@ -29,7 +29,7 @@ type public constructor Create(AOwner: TComponent); override; procedure ShowAt(AWidget: TfpgWidget; x, y: TfpgCoord); - procedure Close; + procedure Close; virtual; property DontCloseWidget: TfpgWidget read FDontCloseWidget write FDontCloseWidget; end; |