* GUI: Rename the Checkbox property FontName to FontDesc to be consistent with

  the rest of the fpGUI controls.
* GUI: Introduced FontDesc and HeaderFontDesc properties in TfpgBaseGrid and 
  published them in descendant components.
* GUI Designer: All newly placed components now default to the Delphi coding
  standards component prefixes.

4 files changed, 26 insertions, 26 deletions

diff --git a/examples/apps/uidesigner/uidesigner.lpi b/examples/apps/uidesigner/uidesigner.lpi
index 99714a81..0e92e472 100644
--- a/examples/apps/uidesigner/uidesigner.lpi
+++ b/examples/apps/uidesigner/uidesigner.lpi
@@ -1,7 +1,7 @@
 <?xml version="1.0"?>
 <CONFIG>
   <ProjectOptions>
-    <PathDelim Value="\"/>
+    <PathDelim Value="/"/>
     <Version Value="5"/>
     <General>
       <Flags>
@@ -9,7 +9,7 @@
       </Flags>
       <SessionStorage Value="InProjectDir"/>
       <MainUnit Value="0"/>
-      <IconPath Value=".\"/>
+      <IconPath Value="./"/>
       <TargetFileExt Value=""/>
       <Title Value="uiDesigner"/>
     </General>
@@ -24,7 +24,7 @@
     <RunParams>
       <local>
         <FormatVersion Value="1"/>
-        <LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
+        <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
       </local>
     </RunParams>
     <RequiredPackages Count="1">
@@ -103,7 +103,6 @@
   </ProjectOptions>
   <CompilerOptions>
     <Version Value="5"/>
-    <PathDelim Value="\"/>
     <Parsing>
       <SyntaxOptions>
         <AllowLabel Value="False"/>
diff --git a/examples/apps/uidesigner/vfdforms.pas b/examples/apps/uidesigner/vfdforms.pas
index 5f337ea3..3598386c 100644
--- a/examples/apps/uidesigner/vfdforms.pas
+++ b/examples/apps/uidesigner/vfdforms.pas
@@ -191,6 +191,7 @@ begin
   clist.Anchors := [anLeft, anRight, anTop, anBottom];
 
   clist.Items.Add('-');
+{
   clist.Items.Add('Label');
   clist.Items.Add('Edit');
   clist.Items.Add('Button');
@@ -199,7 +200,7 @@ begin
   clist.Items.Add('Memo');
   clist.Items.Add('ListBox');
   clist.Items.Add('[OTHER]');
-
+}
   clist.OnChange := @(maindsgn.OnPaletteChange);
 end;
 
diff --git a/examples/apps/uidesigner/vfdmain.pas b/examples/apps/uidesigner/vfdmain.pas
index 7945a03c..80dde07b 100644
--- a/examples/apps/uidesigner/vfdmain.pas
+++ b/examples/apps/uidesigner/vfdmain.pas
@@ -431,7 +431,7 @@ begin
   s := ExtractFileName(FEditedFileName);
   if s = '' then
     s := '[new]';
-  frmMain.WindowTitle := 'fpGUI uiDesigner v' + program_version + ' - ' + s;
+  frmMain.WindowTitle := 'fpGUI Designer v' + program_version + ' - ' + s;
 end;
 
 end.
diff --git a/examples/apps/uidesigner/vfdwidgets.pas b/examples/apps/uidesigner/vfdwidgets.pas
index c628ebf0..3794586c 100644
--- a/examples/apps/uidesigner/vfdwidgets.pas
+++ b/examples/apps/uidesigner/vfdwidgets.pas
@@ -169,33 +169,33 @@ begin
 
   // Label
   wc          := TVFDWidgetClass.Create(TfpgLabel);
-  wc.NameBase := 'lb';
+  wc.NameBase := 'lblName';
   wc.AddProperty('Text', TPropertyString, 'Label text');
-  wc.AddProperty('FontDesc', TPropertyString, 'The font used displaying the label text');
+  wc.AddProperty('FontDesc', TPropertyString, 'The font used for displaying the label text');
   wc.WidgetIconName := 'vfd.label';
   RegisterVFDWidget(wc);
 
   // Edit
   wc          := TVFDWidgetClass.Create(TfpgEdit);
-  wc.NameBase := 'ed';
+  wc.NameBase := 'edtName';
   wc.AddProperty('Text', TPropertyString, 'Initial text');
-  wc.AddProperty('FontDesc', TPropertyString, 'The font used displaying the text');
+  wc.AddProperty('FontDesc', TPropertyString, 'The font used for displaying the text');
   wc.WidgetIconName := 'vfd.edit';
   RegisterVFDWidget(wc);
 
   // Memo
   wc          := TVFDWidgetClass.Create(TfpgMemo);
-  wc.NameBase := 'memo';
+  wc.NameBase := 'memName';
   wc.AddProperty('Lines', TPropertyStringList, '');
-  wc.AddProperty('FontDesc', TPropertyString, 'The font used displaying the text');
+  wc.AddProperty('FontDesc', TPropertyString, 'The font used for displaying the text');
   wc.WidgetIconName := 'vfd.memo';
   RegisterVFDWidget(wc);
 
   // Button
   wc          := TVFDWidgetClass.Create(TfpgButton);
-  wc.NameBase := 'btn';
+  wc.NameBase := 'btnName';
   wc.AddProperty('Text', TPropertyString, 'Initial text');
-  wc.AddProperty('FontDesc', TPropertyString, 'The font used displaying the text');
+  wc.AddProperty('FontDesc', TPropertyString, 'The font used for displaying the text');
   wc.AddProperty('ImageName', TPropertyString, '');
 //  wc.AddProperty('ShowImage', TPropertyEnum, '');
   wc.AddProperty('ModalResult', TPropertyInteger, '');
@@ -204,42 +204,42 @@ begin
 
   // CheckBox
   wc          := TVFDWidgetClass.Create(TfpgCheckBox);
-  wc.NameBase := 'cb';
+  wc.NameBase := 'cbName';
   wc.AddProperty('Text', TPropertyString, 'Initial text');
-  wc.AddProperty('FontDesc', TPropertyString, 'The font used displaying the text');
+  wc.AddProperty('FontDesc', TPropertyString, 'The font used for displaying the text');
   wc.WidgetIconName := 'vfd.checkbox';
   RegisterVFDWidget(wc);
 
-  // ChoiceList
+  // ComboBox
   wc          := TVFDWidgetClass.Create(TfpgComboBox);
-  wc.NameBase := 'chl';
+  wc.NameBase := 'cbName';
   //wc.AddProperty('Text',TPropertyString16,'');
   wc.AddProperty('Items', TPropertyStringList, '');
-  wc.AddProperty('FontDesc', TPropertyString, 'The font used displaying the text');
+  wc.AddProperty('FontDesc', TPropertyString, 'The font used for displaying the text');
   wc.WidgetIconName := 'vfd.choicelist';
   RegisterVFDWidget(wc);
 
-  // TextListBox
+  // ListBox
   wc          := TVFDWidgetClass.Create(TfpgListBox);
-  wc.NameBase := 'lst';
+  wc.NameBase := 'lstName';
   //wc.AddProperty('Text',TPropertyString16,'');
   wc.AddProperty('Items', TPropertyStringList, '');
-  wc.AddProperty('FontDesc', TPropertyString, 'The font used displaying the text');
+  wc.AddProperty('FontDesc', TPropertyString, 'The font used for displaying the text');
   wc.WidgetIconName := 'vfd.listbox';
   RegisterVFDWidget(wc);
 
   // StringGrid
   wc := TVFDWidgetClass.Create(TfpgStringGrid);
-  wc.NameBase := 'grid';
+  wc.NameBase := 'grdName';
 //  wc.AddProperty('Columns',TPropertyDBColumns,'');
   wc.AddProperty('FontDesc',TPropertyString,'');
-  wc.AddProperty('HeaderFontName',TPropertyString,'');
+  wc.AddProperty('HeaderFontDesc',TPropertyString,'');
   wc.WidgetIconName := 'vfd.dbgrid';
   RegisterVFDWidget(wc);
 
   // Panel
   wc           := TVFDWidgetClass.Create(TfpgBevel);
-  wc.NameBase  := 'panel';
+  wc.NameBase  := 'pnlName';
   wc.AddProperty('shape', TPropertyEnum, '');
   wc.AddProperty('style', TPropertyEnum, '');
   wc.WidgetIconName := 'vfd.panel';
@@ -248,7 +248,7 @@ begin
 
   // Other - do not delete!!! this should be the last...
   wc          := TVFDWidgetClass.Create(TOtherWidget);
-  wc.NameBase := 'wg';
+  wc.NameBase := 'Custom';
   wc.WidgetIconName := 'vfd.other';
   RegisterVFDWidget(wc);
   VFDOtherWidget := wc;