summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--src/gui/fpg_animation.pas1
-rw-r--r--src/gui/fpg_button.pas4
-rw-r--r--src/gui/fpg_checkbox.pas1
-rw-r--r--src/gui/fpg_combobox.pas1
-rw-r--r--src/gui/fpg_edit.pas5
-rw-r--r--src/gui/fpg_editcombo.pas6
-rw-r--r--src/gui/fpg_form.pas1
-rw-r--r--src/gui/fpg_gauge.pas1
-rw-r--r--src/gui/fpg_grid.pas2
-rw-r--r--src/gui/fpg_hyperlink.pas1
-rw-r--r--src/gui/fpg_label.pas1
-rw-r--r--src/gui/fpg_listbox.pas1
-rw-r--r--src/gui/fpg_listview.pas1
-rw-r--r--src/gui/fpg_memo.pas1
-rw-r--r--src/gui/fpg_panel.pas3
-rw-r--r--src/gui/fpg_popupcalendar.pas1
-rw-r--r--src/gui/fpg_progressbar.pas1
-rw-r--r--src/gui/fpg_radiobutton.pas1
-rw-r--r--src/gui/fpg_spinedit.pas10
-rw-r--r--src/gui/fpg_tab.pas1
-rw-r--r--src/gui/fpg_trackbar.pas2
-rw-r--r--src/gui/fpg_tree.pas1
22 files changed, 37 insertions, 10 deletions
diff --git a/src/gui/fpg_animation.pas b/src/gui/fpg_animation.pas
index 0bace3f0..fedfa545 100644
--- a/src/gui/fpg_animation.pas
+++ b/src/gui/fpg_animation.pas
@@ -70,6 +70,7 @@ type
property ImageFileName;
property IsTransparent;
property FrameCount;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_button.pas b/src/gui/fpg_button.pas
index 8ebc0c6a..ebfa8b49 100644
--- a/src/gui/fpg_button.pas
+++ b/src/gui/fpg_button.pas
@@ -33,7 +33,6 @@ type
TImageLayout = (ilImageLeft, ilImageTop, ilImageRight, ilImageBottom);
- { TfpgBaseButton }
TfpgBaseButton = class(TfpgWidget, ICommandHolder)
private
@@ -149,12 +148,13 @@ type
property Text;
property TextColor;
property TabOrder;
+ property OnClick;
property OnMouseDown;
property OnMouseExit;
property OnMouseEnter;
property OnMouseMove;
property OnMouseUp;
- property OnClick;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_checkbox.pas b/src/gui/fpg_checkbox.pas
index 71eaa572..e514da25 100644
--- a/src/gui/fpg_checkbox.pas
+++ b/src/gui/fpg_checkbox.pas
@@ -78,6 +78,7 @@ type
property OnChange;
property OnEnter;
property OnExit;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_combobox.pas b/src/gui/fpg_combobox.pas
index 2de546f5..2fc1432a 100644
--- a/src/gui/fpg_combobox.pas
+++ b/src/gui/fpg_combobox.pas
@@ -156,6 +156,7 @@ type
property OnDropDown;
property OnEnter;
property OnExit;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_edit.pas b/src/gui/fpg_edit.pas
index 4920fe05..78d6d8cb 100644
--- a/src/gui/fpg_edit.pas
+++ b/src/gui/fpg_edit.pas
@@ -185,6 +185,7 @@ type
property OnMouseEnter;
property OnMouseExit;
property OnPaint;
+ property OnShowHint;
end;
@@ -232,6 +233,7 @@ type
property OnMouseEnter;
property OnMouseExit;
property OnPaint;
+ property OnShowHint;
public
constructor Create(AOwner: TComponent); override;
published
@@ -269,6 +271,7 @@ type
property OnMouseEnter;
property OnMouseExit;
property OnMouseMove;
+ property OnShowHint;
end;
@@ -309,6 +312,7 @@ type
property OnMouseEnter;
property OnMouseExit;
property OnMouseMove;
+ property OnShowHint;
end;
@@ -344,6 +348,7 @@ type
property OnKeyPress;
property OnMouseEnter;
property OnMouseExit;
+ property OnShowHint;
end;
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;
diff --git a/src/gui/fpg_form.pas b/src/gui/fpg_form.pas
index e93c04c6..270ceec7 100644
--- a/src/gui/fpg_form.pas
+++ b/src/gui/fpg_form.pas
@@ -124,6 +124,7 @@ type
property OnPaint;
property OnResize;
property OnShow;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_gauge.pas b/src/gui/fpg_gauge.pas
index 34b19a17..2236e912 100644
--- a/src/gui/fpg_gauge.pas
+++ b/src/gui/fpg_gauge.pas
@@ -97,6 +97,7 @@ type
property ShowHint;
property ShowText: Boolean read FShowText write SetShowText default True;
property Visible;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_grid.pas b/src/gui/fpg_grid.pas
index db087fae..0dbc96c4 100644
--- a/src/gui/fpg_grid.pas
+++ b/src/gui/fpg_grid.pas
@@ -67,6 +67,7 @@ type
property TabOrder;
property OnRowChange;
property OnDoubleClick;
+ property OnShowHint;
end;
@@ -154,6 +155,7 @@ type
property OnFocusChange;
property OnKeyPress;
property OnRowChange;
+ property OnShowHint;
end;
function CreateStringGrid(AOwner: TComponent; x, y, w, h: TfpgCoord; AColumnCount: integer = 0): TfpgStringGrid;
diff --git a/src/gui/fpg_hyperlink.pas b/src/gui/fpg_hyperlink.pas
index 25b7aebd..f0f9e4a9 100644
--- a/src/gui/fpg_hyperlink.pas
+++ b/src/gui/fpg_hyperlink.pas
@@ -60,6 +60,7 @@ type
property ShowHint;
property URL: TfpgString read FUrl write SetURL;
property OnClick;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_label.pas b/src/gui/fpg_label.pas
index 52c0d339..708a6204 100644
--- a/src/gui/fpg_label.pas
+++ b/src/gui/fpg_label.pas
@@ -88,6 +88,7 @@ type
property OnMouseExit;
property OnMouseMove;
property OnMouseUp;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_listbox.pas b/src/gui/fpg_listbox.pas
index 5ca37d10..3b668ded 100644
--- a/src/gui/fpg_listbox.pas
+++ b/src/gui/fpg_listbox.pas
@@ -146,6 +146,7 @@ type
property TabOrder;
property TextColor;
property OnDoubleClick;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_listview.pas b/src/gui/fpg_listview.pas
index ae3e1ac3..60698b2a 100644
--- a/src/gui/fpg_listview.pas
+++ b/src/gui/fpg_listview.pas
@@ -263,6 +263,7 @@ type
property OnPaintColumn: TfpgLVPaintColumnEvent read FOnPaintColumn write FOnPaintColumn;
property OnPaintItem: TfpgLVPaintItemEvent read FOnPaintItem write FOnPaintItem;
property OnSelectionChanged: TfpgLVItemSelectEvent read FOnSelectionChanged write FOnSelectionChanged;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_memo.pas b/src/gui/fpg_memo.pas
index bbc4b4ca..37f21a42 100644
--- a/src/gui/fpg_memo.pas
+++ b/src/gui/fpg_memo.pas
@@ -120,6 +120,7 @@ type
property OnEnter;
property OnExit;
property OnKeyPress;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_panel.pas b/src/gui/fpg_panel.pas
index 1d95167f..80226f62 100644
--- a/src/gui/fpg_panel.pas
+++ b/src/gui/fpg_panel.pas
@@ -79,6 +79,7 @@ type
property OnMouseMove;
property OnMouseUp;
property OnPaint;
+ property OnShowHint;
end;
@@ -129,6 +130,7 @@ type
property WrapText: boolean read GetWrapText write SetWrapText default False;
property OnClick;
property OnDoubleClick;
+ property OnShowHint;
end;
@@ -167,6 +169,7 @@ type
property TextColor;
property OnClick;
property OnDoubleClick;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_popupcalendar.pas b/src/gui/fpg_popupcalendar.pas
index fac10f4c..ede98881 100644
--- a/src/gui/fpg_popupcalendar.pas
+++ b/src/gui/fpg_popupcalendar.pas
@@ -191,6 +191,7 @@ type
property OnDropDown;
property OnEnter;
property OnExit;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_progressbar.pas b/src/gui/fpg_progressbar.pas
index 896785c3..ee6b2405 100644
--- a/src/gui/fpg_progressbar.pas
+++ b/src/gui/fpg_progressbar.pas
@@ -70,6 +70,7 @@ type
property ShowHint;
property Step;
property TextColor;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_radiobutton.pas b/src/gui/fpg_radiobutton.pas
index fa4b4322..9410a000 100644
--- a/src/gui/fpg_radiobutton.pas
+++ b/src/gui/fpg_radiobutton.pas
@@ -74,6 +74,7 @@ type
property Text: string read FText write SetText;
property TextColor;
property OnChange: TNotifyEvent read FOnChange write FOnChange;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_spinedit.pas b/src/gui/fpg_spinedit.pas
index 6ec93a9d..21548f97 100644
--- a/src/gui/fpg_spinedit.pas
+++ b/src/gui/fpg_spinedit.pas
@@ -120,7 +120,7 @@ type
procedure SetValue(const AValue: extended);
procedure SetDecimals(const AValue: integer);
procedure SetFixedDecimals(const AValue: Boolean);
- procedure SetHint(const AValue: string); override;
+ procedure SetHint(const AValue: TfpgString); override;
procedure ButtonUpClick(Sender: TObject);
procedure ButtonDownClick(Sender: TObject);
procedure ButtonUpMouseDown(Sender: TObject; AButton: TMouseButton; AShift: TShiftState; const AMousePos: TPoint);
@@ -160,6 +160,7 @@ type
property OnMouseEnter;
property OnMouseExit;
property OnPaint;
+ property OnShowHint;
end;
@@ -190,7 +191,7 @@ type
procedure SetIncrement(const AValue: integer);
procedure SetLargeIncrement(const AValue: integer);
procedure SetValue(const AValue: integer);
- procedure SetHint(const AValue: string); override;
+ procedure SetHint(const AValue: TfpgString); override;
procedure ButtonUpClick(Sender: TObject);
procedure ButtonDownClick(Sender: TObject);
procedure ButtonUpMouseDown(Sender: TObject; AButton: TMouseButton; AShift: TShiftState; const AMousePos: TPoint);
@@ -228,6 +229,7 @@ type
property OnMouseEnter;
property OnMouseExit;
property OnPaint;
+ property OnShowHint;
end;
@@ -620,7 +622,7 @@ begin
end;
end;
-procedure TfpgSpinEditFloat.SetHint(const AValue: string);
+procedure TfpgSpinEditFloat.SetHint(const AValue: TfpgString);
begin
inherited SetHint(AValue);
// let child component use the same hint
@@ -1034,7 +1036,7 @@ begin
end;
end;
-procedure TfpgSpinEdit.SetHint(const AValue: string);
+procedure TfpgSpinEdit.SetHint(const AValue: TfpgString);
begin
inherited SetHint(AValue);
// let child component use the same hint
diff --git a/src/gui/fpg_tab.pas b/src/gui/fpg_tab.pas
index 69517217..9999fa83 100644
--- a/src/gui/fpg_tab.pas
+++ b/src/gui/fpg_tab.pas
@@ -156,6 +156,7 @@ type
property TabOrder;
property TabPosition: TfpgTabPosition read FTabPosition write SetTabPosition default tpTop;
property TextColor;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_trackbar.pas b/src/gui/fpg_trackbar.pas
index c072181b..524a4c4c 100644
--- a/src/gui/fpg_trackbar.pas
+++ b/src/gui/fpg_trackbar.pas
@@ -78,6 +78,7 @@ type
property Orientation: TOrientation read FOrientation write FOrientation default orHorizontal;
property TabOrder;
property OnChange: TTrackBarChange read FOnChange write FOnChange;
+ property OnShowHint;
end;
@@ -129,6 +130,7 @@ type
property OnChange: TTrackBarChange read FOnChange write FOnChange;
property OnEnter;
property OnExit;
+ property OnShowHint;
end;
diff --git a/src/gui/fpg_tree.pas b/src/gui/fpg_tree.pas
index 19e6f7c7..b61b0c29 100644
--- a/src/gui/fpg_tree.pas
+++ b/src/gui/fpg_tree.pas
@@ -243,6 +243,7 @@ type
property OnChange: TNotifyEvent read FOnChange write FOnChange;
property OnExpand: TfpgTreeExpandEvent read FOnExpand write FOnExpand;
property OnDoubleClick;
+ property OnShowHint;
end;
generated by cgit v1.2.3-70-g09d2 (git 2.47.0) at 2024-10-12 07:25:09 +0000