From f25cfbc7ffd87929e317e80a7021b70d5bf5ad1a Mon Sep 17 00:00:00 2001
From: Graeme Geldenhuys <graeme@mastermaths.co.za>
Date: Thu, 1 Apr 2010 15:36:40 +0200
Subject: UI Designer: Published three new properties.

New properties in Object Inspector for TfpgEdit is:
  * AutoSelect
  * AutoSize
  * BorderStyle
---
 uidesigner/vfdwidgets.pas | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'uidesigner/vfdwidgets.pas')

diff --git a/uidesigner/vfdwidgets.pas b/uidesigner/vfdwidgets.pas
index f9338b56..597a6a30 100644
--- a/uidesigner/vfdwidgets.pas
+++ b/uidesigner/vfdwidgets.pas
@@ -321,6 +321,9 @@ begin
   wc          := TVFDWidgetClass.Create(TfpgEdit);
   wc.NameBase := 'Edit';
 //  wc.AddProperty('Color', TPropertyColor, 'Text color');
+  wc.AddProperty('AutoSelect', TPropertyBoolean, 'On receiving focus, auto select text');
+  wc.AddProperty('AutoSize', TPropertyBoolean, 'Change Height based on FontDesc being set');
+  wc.AddProperty('BorderStyle', TPropertyEnum, '');
   wc.AddProperty('Hint', TPropertyString, 'Tooltip hint');
   wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');
   wc.AddProperty('Text', TPropertyString, 'Initial text');
-- 
cgit v1.2.3-70-g09d2