Index: MainFrm.dfm
===================================================================
--- MainFrm.dfm	(revision 13355)
+++ MainFrm.dfm	(working copy)
@@ -7,22 +7,14 @@
   Color = clBtnFace
   Constraints.MinHeight = 270
   Constraints.MinWidth = 560
-  DefaultMonitor = dmDesktop
-  Font.Charset = DEFAULT_CHARSET
-  Font.Color = clWindowText
-  Font.Height = -11
-  Font.Name = 'MS Shell Dlg 2'
-  Font.Style = []
   OldCreateOrder = False
   Position = poScreenCenter
-  Scaled = False
   OnCreate = FormCreate
-  PixelsPerInch = 96
   TextHeight = 13
   object Label1: TLabel
     Left = 16
     Top = 16
-    Width = 155
+    autosize = true
     Height = 13
     Caption = 'This edit must have a(ny) value:'
     FocusControl = edRequired
@@ -30,7 +22,7 @@
   object Label2: TLabel
     Left = 16
     Top = 64
-    Width = 215
+    autosize = true
     Height = 13
     Caption = 'This edit must have more than 9  characters:'
     FocusControl = edRequired10Chars
@@ -38,7 +30,7 @@
   object Label3: TLabel
     Left = 16
     Top = 112
-    Width = 213
+    autosize = true
     Height = 13
     Caption = 'This edit must match the reg. expr."A.B.C.":'
     FocusControl = edRegExpr
@@ -46,7 +38,7 @@
   object Label4: TLabel
     Left = 16
     Top = 160
-    Width = 188
+    autosize = true
     Height = 13
     Caption = 'The value must be between 0 and 100:'
     FocusControl = edRange0to100
@@ -54,9 +46,10 @@
   object Label5: TLabel
     Left = 272
     Top = 16
-    Width = 34
+    autosize = true
     Height = 13
-    Caption = 'Result:'
+    Caption = 'Result  (Double-click to show help):'
+    OnDblClick = reResultsDblClick
   end
   object edRequired: TEdit
     Left = 16
@@ -119,15 +112,13 @@
     TabOrder = 5
     OnClick = btnProviderCheckClick
   end
-  object reResults: TRichEdit
+  object reResults: TMemo
     Left = 272
     Top = 32
     Width = 306
     Height = 167
-    Cursor = crArrow
     TabStop = False
     Anchors = [akLeft, akTop, akRight, akBottom]
-    Ctl3D = True
     Lines.Strings = (
       
         'This is a demo for the JvValidators component as well as the JvE' +
@@ -168,12 +159,13 @@
       ''
       '')
     ParentColor = True
-    ParentCtl3D = False
+    ParentCtl3D = True
     ReadOnly = True
     ScrollBars = ssBoth
     TabOrder = 8
     WordWrap = False
     OnEnter = reResultsEnter
+	OnDblClick = reResultsDblClick
   end
   object btnValSum: TButton
     Left = 174
@@ -197,6 +189,7 @@
       PropertyToValidate = 'Text'
       Enabled = True
       ErrorMessage = 'Value in edRequired cannot be empty'
+	  AllowBlank = False
     end
     object JvCustomValidator1: TJvCustomValidator
       Valid = True
