summaryrefslogtreecommitdiff
path: root/src/corelib
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-08-20 15:08:43 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-08-20 15:08:43 +0000
commit7162ddf3447586b1255438ce4961119feaa5d9ef (patch)
treeac828813051f8c10a156c95b4f1dc6ae2fda8d56 /src/corelib
parent42213545425979cb84f66fd78ecf2336c373d81f (diff)
downloadfpGUI-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.pas2
-rw-r--r--src/corelib/gfx_popupwindow.pas2
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;