diff options
Diffstat (limited to 'src/gui/fpg_editcombo.pas')
-rw-r--r-- | src/gui/fpg_editcombo.pas | 6 |
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; |