diff options
Diffstat (limited to 'src/corelib')
| -rw-r--r-- | src/corelib/gfx_widget.pas | 17 | ||||
| -rw-r--r-- | src/corelib/predefinedcolors.inc | 1 |
2 files changed, 11 insertions, 7 deletions
diff --git a/src/corelib/gfx_widget.pas b/src/corelib/gfx_widget.pas index 9e9021f8..2032eb3d 100644 --- a/src/corelib/gfx_widget.pas +++ b/src/corelib/gfx_widget.pas @@ -49,6 +49,7 @@ type FAnchors: TAnchors; FActiveWidget: TfpgWidget; FAlign: TAlign; + FHint: string; function GetParent: TfpgWidget; reintroduce; procedure SetParent(const AValue: TfpgWidget); reintroduce; procedure SetEnabled(const AValue: boolean); virtual; @@ -102,6 +103,7 @@ type property Focused: boolean read FFocused write FFocused; property Anchors: TAnchors read FAnchors write FAnchors; property Align: TAlign read FAlign write FAlign; + property Hint: string read FHint write FHint; end; @@ -183,15 +185,16 @@ end; constructor TfpgWidget.Create(AOwner: TComponent); begin - FOnScreen := False; - FVisible := True; + FOnScreen := False; + FVisible := True; FActiveWidget := nil; FEnabled := True; - FFocusable := False; - FFocused := False; - FTabOrder := 0; - FAnchors := [anLeft, anTop]; - FAlign := alNone; + FFocusable := False; + FFocused := False; + FTabOrder := 0; + FAnchors := [anLeft, anTop]; + FAlign := alNone; + FHint := ''; // OnKeyPress := nil; if (AOwner <> nil) and (AOwner is TfpgWidget) then diff --git a/src/corelib/predefinedcolors.inc b/src/corelib/predefinedcolors.inc index cba6d620..ff138759 100644 --- a/src/corelib/predefinedcolors.inc +++ b/src/corelib/predefinedcolors.inc @@ -174,6 +174,7 @@ clPaleGreen = TfpgColor($98fb98); clPaleTurquoise = TfpgColor($afeeee); clPaleVioletRed = TfpgColor($db7093); + clPaleBlue = TfpgColor($e9f5fe); clPapayaWhip = TfpgColor($ffefd5); clPeachPuff = TfpgColor($ffdab9); clPeru = TfpgColor($cd853f); |