summaryrefslogtreecommitdiff
path: root/src/gui/fpg_editcombo.pas
diff options
context:
space:
mode:
Diffstat (limited to 'src/gui/fpg_editcombo.pas')
-rw-r--r--src/gui/fpg_editcombo.pas6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/gui/fpg_editcombo.pas b/src/gui/fpg_editcombo.pas
index 2ad4e003..20b6ee8d 100644
--- a/src/gui/fpg_editcombo.pas
+++ b/src/gui/fpg_editcombo.pas
@@ -64,8 +64,6 @@ type
TAllowNew = (anNo, anYes, anAsk);
- { TfpgBaseEditCombo }
-
TfpgBaseEditCombo = class(TfpgBaseComboBox)
private
FAutoCompletion: Boolean;
@@ -77,8 +75,7 @@ type
procedure SetAllowNew(const AValue: TAllowNew);
procedure InternalBtnClick(Sender: TObject);
procedure InternalListBoxSelect(Sender: TObject);
- procedure InternalListBoxKeyPress(Sender: TObject; var keycode: word; var shiftstate: TShiftState;
- var consumed: Boolean);
+ procedure InternalListBoxKeyPress(Sender: TObject; var keycode: word; var shiftstate: TShiftState; var consumed: Boolean);
protected
FDropDown: TfpgPopupWindow;
FDrawOffset: integer;
@@ -132,6 +129,7 @@ type
property OnEnter;
property OnExit;
property OnKeyPress;
+ property OnShowHint;
end;