diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-07-07 22:52:27 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-07-07 22:52:27 +0000 |
commit | 77f68d38a6dc24ec0679f7fd23bf42869e795313 (patch) | |
tree | 875e8d65bddd8470aff8026e634738804d59df84 /src/gui | |
parent | 0fed18d37c6348ec91790f7e3fab843b2efaceda (diff) | |
download | fpGUI-77f68d38a6dc24ec0679f7fd23bf42869e795313.tar.xz |
* Published more events and properties for EditInteger and EditFload components.
* Now the Min/Max Size is actually applied, the Message Dialogs needed minor attention.
* Updated all the example projects to use the newer all-in-one fpgui_toolkit lazarus package.
* Did some minor bug fixing in some of the examples. 1-based indexing instead of 0-based indexing etc.
Diffstat (limited to 'src/gui')
-rw-r--r-- | src/gui/gui_edit.pas | 32 | ||||
-rw-r--r-- | src/gui/messagedialog.inc | 2 |
2 files changed, 26 insertions, 8 deletions
diff --git a/src/gui/gui_edit.pas b/src/gui/gui_edit.pas index ce9a9f64..7582d494 100644 --- a/src/gui/gui_edit.pas +++ b/src/gui/gui_edit.pas @@ -193,9 +193,18 @@ type procedure Format; override; procedure HandleKeyChar(var AText: TfpgChar; var shiftstate: TShiftState; var consumed: Boolean); override; published - property Alignment; - property NegativeColor; - property Value: integer read GetValue write SetValue; + property Alignment; + property NegativeColor; + property Value: integer read GetValue write SetValue; + property TabOrder; + property TextColor; + property OnChange; + property OnEnter; + property OnExit; + property OnKeyPress; + property OnMouseEnter; + property OnMouseExit; + property OnPaint; end; @@ -205,10 +214,19 @@ type procedure SetValue(const AValue: extended); virtual; procedure HandleKeyChar(var AText: TfpgChar; var shiftstate: TShiftState; var consumed: Boolean); override; published - property Alignment; - property NegativeColor; - property DecimalSeparator; - property Value: extended read GetValue write SetValue; + property Alignment; + property NegativeColor; + property DecimalSeparator; + property Value: extended read GetValue write SetValue; + property TabOrder; + property TextColor; + property OnChange; + property OnEnter; + property OnExit; + property OnKeyPress; + property OnMouseEnter; + property OnMouseExit; + property OnPaint; end; diff --git a/src/gui/messagedialog.inc b/src/gui/messagedialog.inc index 8bfaee4f..4e1257e7 100644 --- a/src/gui/messagedialog.inc +++ b/src/gui/messagedialog.inc @@ -450,7 +450,7 @@ begin Width := 500; Height := 400; MinWidth := 300; - MinHeight := 300; + MinHeight := 160; WindowPosition := wpScreenCenter; lblName1 := TfpgLabel.Create(self); |