diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-01-19 21:55:08 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-03-26 21:12:15 +0200 |
| commit | 5419e53bddf37d667c135d0449eeb33d0ff75b01 (patch) | |
| tree | e88f8946f02d942fb9ddabc5795611b1ba1a176c | |
| parent | 01b4f60f588a095abe37475d1d7473484aed33e0 (diff) | |
| download | fpGUI-5419e53bddf37d667c135d0449eeb33d0ff75b01.tar.xz | |
Set the default value for IgnoreDblClick property
| -rw-r--r-- | src/corelib/fpg_widget.pas | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/corelib/fpg_widget.pas b/src/corelib/fpg_widget.pas index efbf6127..fa167c85 100644 --- a/src/corelib/fpg_widget.pas +++ b/src/corelib/fpg_widget.pas @@ -179,7 +179,7 @@ type property Anchors: TAnchors read FAnchors write FAnchors default [anLeft, anTop]; property Align: TAlign read FAlign write SetAlign default alNone; property Hint: TfpgString read GetHint write SetHint; - property IgnoreDblClicks: Boolean read FIgnoreDblClicks write FIgnoreDblClicks; + property IgnoreDblClicks: Boolean read FIgnoreDblClicks write FIgnoreDblClicks default False; property ShowHint: boolean read FShowHint write SetShowHint stored IsShowHintStored; property ParentShowHint: boolean read FParentShowHint write SetParentShowHint default True; property BackgroundColor: TfpgColor read FBackgroundColor write SetBackgroundColor default clWindowBackground; @@ -482,6 +482,7 @@ begin FTextColor := clText1; FAcceptDrops := False; FOnClickPending := False; + FIgnoreDblClicks := False; inherited Create(AOwner); |