packager: change AUnitName property to Unit_Name

git-svn-id: trunk@22353 -

packager/addfiletoapackagedlg.lfm

@@ -10,17 +10,17 @@ object AddFileToAPackageDialog: TAddFileToAPackageDialog
   OnClose = AddFileToAPackageDlgClose
   Position = poScreenCenter
   ShowHint = True
-  LCLVersion = '0.9.27'
+  LCLVersion = '0.9.29'
   object FileGroupBox: TGroupBox
     Left = 6
-    Height = 152
+    Height = 148
     Top = 6
     Width = 457
     Align = alTop
     AutoSize = True
     BorderSpacing.Around = 6
     Caption = 'FileGroupBox'
-    ClientHeight = 134
+    ClientHeight = 130
     ClientWidth = 453
     TabOrder = 0
     object UnitNameLabel: TLabel
@@ -28,7 +28,7 @@ object AddFileToAPackageDialog: TAddFileToAPackageDialog
       AnchorSideTop.Side = asrBottom
       Left = 6
       Height = 14
-      Top = 35
+      Top = 33
       Width = 439
       Anchors = [akTop, akLeft, akRight]
       BorderSpacing.Left = 6
@@ -42,7 +42,7 @@ object AddFileToAPackageDialog: TAddFileToAPackageDialog
       AnchorSideTop.Side = asrBottom
       Left = 6
       Height = 25
-      Top = 103
+      Top = 99
       Width = 439
       Anchors = [akTop, akLeft, akRight]
       AutoFill = True
@@ -63,7 +63,7 @@ object AddFileToAPackageDialog: TAddFileToAPackageDialog
     end
     object FileNameEdit: TEdit
       Left = 6
-      Height = 23
+      Height = 21
       Top = 6
       Width = 439
       Anchors = [akTop, akLeft, akRight]
@@ -76,8 +76,8 @@ object AddFileToAPackageDialog: TAddFileToAPackageDialog
       AnchorSideTop.Control = UnitNameLabel
       AnchorSideTop.Side = asrBottom
       Left = 6
-      Height = 23
+      Height = 21
-      Top = 51
+      Top = 49
       Width = 439
       Anchors = [akTop, akLeft, akRight]
       BorderSpacing.Top = 2
@@ -89,7 +89,7 @@ object AddFileToAPackageDialog: TAddFileToAPackageDialog
       AnchorSideTop.Side = asrBottom
       Left = 6
       Height = 17
-      Top = 80
+      Top = 76
       Width = 439
       Anchors = [akTop, akLeft, akRight]
       BorderSpacing.Top = 6
@@ -100,7 +100,7 @@ object AddFileToAPackageDialog: TAddFileToAPackageDialog
   object PackagesGroupBox: TGroupBox
     Left = 6
     Height = 74
-    Top = 164
+    Top = 160
     Width = 457
     Align = alTop
     Anchors = [akLeft, akRight]
@@ -116,10 +116,8 @@ object AddFileToAPackageDialog: TAddFileToAPackageDialog
       Top = 6
       Width = 441
       Align = alTop
-      AutoComplete = False
       BorderSpacing.Around = 6
       ItemHeight = 13
-      ItemWidth = 0
       TabOrder = 0
       Text = 'PackagesComboBox'
     end

packager/addfiletoapackagedlg.lrs

@@ -5,18 +5,18 @@ LazarusResources.Add('TAddFileToAPackageDialog','FORMDATA',[
   +#6'Height'#3#168#1#3'Top'#3#221#0#5'Width'#3#213#1#13'ActiveControl'#7#12'Fi'
   +'leNameEdit'#7'Caption'#6#23'AddFileToAPackageDialog'#12'ClientHeight'#3#168
   +#1#11'ClientWidth'#3#213#1#7'OnClose'#7#25'AddFileToAPackageDlgClose'#8'Posi'
-  +'tion'#7#14'poScreenCenter'#8'ShowHint'#9#10'LCLVersion'#6#6'0.9.27'#0#9'TGr'
+  +'tion'#7#14'poScreenCenter'#8'ShowHint'#9#10'LCLVersion'#6#6'0.9.29'#0#9'TGr'
-  +'oupBox'#12'FileGroupBox'#4'Left'#2#6#6'Height'#3#152#0#3'Top'#2#6#5'Width'#3
+  +'oupBox'#12'FileGroupBox'#4'Left'#2#6#6'Height'#3#148#0#3'Top'#2#6#5'Width'#3
   +#201#1#5'Align'#7#5'alTop'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Capt'
-  +'ion'#6#12'FileGroupBox'#12'ClientHeight'#3#134#0#11'ClientWidth'#3#197#1#8
+  +'ion'#6#12'FileGroupBox'#12'ClientHeight'#3#130#0#11'ClientWidth'#3#197#1#8
   +'TabOrder'#2#0#0#6'TLabel'#13'UnitNameLabel'#21'AnchorSideTop.Control'#7#12
   +'FileNameEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2
-  +#14#3'Top'#2'#'#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+  +#14#3'Top'#2'!'#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
   +#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Rig'
   +'ht'#2#6#7'Caption'#6#13'UnitNameLabel'#11'ParentColor'#8#0#0#11'TRadioGroup'
   +#18'FileTypeRadioGroup'#21'AnchorSideTop.Control'#7#23'HasRegisterProcCheckB'
   +'ox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#25#3'Top'
-  +#2'g'#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoF'
+  +#2'c'#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoF'
   +'ill'#9#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#18'FileTypeR'
   +'adioGroup'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpa'
   +'cing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'
@@ -25,27 +25,27 @@ LazarusResources.Add('TAddFileToAPackageDialog','FORMDATA',[
   +#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBotto'
   +'m'#27'ChildSizing.ControlsPerLine'#2#1#21'Constraints.MinHeight'#2#25#8'Tab'
   +'Order'#2#3#7'TabStop'#9#0#0#5'TEdit'#12'FileNameEdit'#4'Left'#2#6#6'Height'
-  +#2#23#3'Top'#2#6#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+  +#2#21#3'Top'#2#6#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
   +#0#20'BorderSpacing.Around'#2#6#8'ReadOnly'#9#8'TabOrder'#2#0#4'Text'#6#12'F'
   +'ileNameEdit'#0#0#5'TEdit'#12'UnitNameEdit'#21'AnchorSideTop.Control'#7#13'U'
   +'nitNameLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2
-  +#23#3'Top'#2'3'#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+  +#21#3'Top'#2'1'#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
   +#0#17'BorderSpacing.Top'#2#2#8'TabOrder'#2#1#4'Text'#6#12'UnitNameEdit'#0#0#9
   +'TCheckBox'#23'HasRegisterProcCheckBox'#21'AnchorSideTop.Control'#7#12'UnitN'
   +'ameEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#17#3
-  +'Top'#2'P'#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17
+  +'Top'#2'L'#5'Width'#3#183#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17
   +'BorderSpacing.Top'#2#6#7'Caption'#6#23'HasRegisterProcCheckBox'#8'TabOrder'
   +#2#2#0#0#0#9'TGroupBox'#16'PackagesGroupBox'#4'Left'#2#6#6'Height'#2'J'#3'To'
-  +'p'#3#164#0#5'Width'#3#201#1#5'Align'#7#5'alTop'#7'Anchors'#11#6'akLeft'#7'a'
+  +'p'#3#160#0#5'Width'#3#201#1#5'Align'#7#5'alTop'#7'Anchors'#11#6'akLeft'#7'a'
   +'kRight'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#16'Packag'
   +'esGroupBox'#12'ClientHeight'#2'8'#11'ClientWidth'#3#197#1#8'TabOrder'#2#1#0
   +#9'TComboBox'#16'PackagesComboBox'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#6#5'W'
-  +'idth'#3#185#1#5'Align'#7#5'alTop'#12'AutoComplete'#8#20'BorderSpacing.Aroun'
+  +'idth'#3#185#1#5'Align'#7#5'alTop'#20'BorderSpacing.Around'#2#6#10'ItemHeigh'
-  +'d'#2#6#10'ItemHeight'#2#13#9'ItemWidth'#2#0#8'TabOrder'#2#0#4'Text'#6#16'Pa'
+  +'t'#2#13#8'TabOrder'#2#0#4'Text'#6#16'PackagesComboBox'#0#0#9'TCheckBox'#15
-  +'ckagesComboBox'#0#0#9'TCheckBox'#15'ShowAllCheckBox'#4'Left'#2#6#6'Height'#2
+  +'ShowAllCheckBox'#4'Left'#2#6#6'Height'#2#17#3'Top'#2'!'#5'Width'#3#185#1#5
-  +#17#3'Top'#2'!'#5'Width'#3#185#1#5'Align'#7#5'alTop'#20'BorderSpacing.Around'
+  +'Align'#7#5'alTop'#20'BorderSpacing.Around'#2#6#7'Caption'#6#15'ShowAllCheck'
-  +#2#6#7'Caption'#6#15'ShowAllCheckBox'#7'OnClick'#7#20'ShowAllCheckBoxClick'#8
+  +'Box'#7'OnClick'#7#20'ShowAllCheckBoxClick'#8'TabOrder'#2#1#0#0#0#12'TButton'
-  +'TabOrder'#2#1#0#0#0#12'TButtonPanel'#8'BtnPanel'#4'Left'#2#6#6'Height'#2#26
+  +'Panel'#8'BtnPanel'#4'Left'#2#6#6'Height'#2#26#3'Top'#3#136#1#5'Width'#3#201
-  +#3'Top'#3#136#1#5'Width'#3#201#1#8'TabOrder'#2#2#11'ShowButtons'#11#4'pbOK'#8
+  +#1#8'TabOrder'#2#2#11'ShowButtons'#11#4'pbOK'#8'pbCancel'#6'pbHelp'#0#9'Show'
-  +'pbCancel'#6'pbHelp'#0#9'ShowBevel'#8#0#0#0
+  +'Bevel'#8#0#0#0
 ]);

packager/addfiletoapackagedlg.pas

@@ -80,7 +80,7 @@ type
     destructor Destroy; override;
     procedure UpdateAvailablePackages;
     property Filename: string read GetFilename write SetFilename;
-    property AUnitName: string read GetUnitName write SetUnitName;
+    property Unit_Name: string read GetUnitName write SetUnitName;
     property FileType: TPkgFileType read GetFileType write SetFileType;
     property HasRegisterProc: boolean read GetHasRegisterProc write SetHasRegisterProc;
   end;
@@ -100,7 +100,7 @@ var
 begin
   AddFileToAPackageDialog:=TAddFileToAPackageDialog.Create(nil);
   AddFileToAPackageDialog.Filename:=Filename;
-  AddFileToAPackageDialog.AUnitName:=AUnitName;
+  AddFileToAPackageDialog.Unit_Name:=AUnitName;
   AddFileToAPackageDialog.HasRegisterProc:=HasRegisterProc;
   AddFileToAPackageDialog.UpdateAvailablePackages;
   Result:=AddFileToAPackageDialog.ShowModal;
@@ -170,7 +170,7 @@ begin
       Include(FileFlags,pffAddToPkgUsesSection);
     if HasRegisterProc then
       Include(FileFlags,pffHasRegisterProc);
-    APackage.AddFile(Filename,AUnitName,FileType,FileFlags,cpNormal);
+    APackage.AddFile(Filename,Unit_Name,FileType,FileFlags,cpNormal);
     if APackage.Editor<>nil then APackage.Editor.UpdateAll;
     APackage.EndUpdate;
 
@@ -251,7 +251,7 @@ end;
 
 procedure TAddFileToAPackageDialog.SetUnitName(const AValue: string);
 begin
-  if AUnitName=AValue then exit;
+  if Unit_Name=AValue then exit;
   UnitNameEdit.Text:=AValue;
 end;
 

packager/addtopackagedlg.lfm

@@ -13,7 +13,7 @@ object AddToPackageDlg: TAddToPackageDlg
   OnDestroy = FormDestroy
   OnKeyDown = AddToPackageDlgKeyDown
   Position = poScreenCenter
-  LCLVersion = '0.9.27'
+  LCLVersion = '0.9.29'
   object NoteBook: TNotebook
     Left = 0
     Height = 300
@@ -24,17 +24,17 @@ object AddToPackageDlg: TAddToPackageDlg
     TabOrder = 0
     object NewFilePage: TPage
       Caption = 'New File'
-      ClientWidth = 498
+      ClientWidth = 492
-      ClientHeight = 273
+      ClientHeight = 274
       OnResize = NewFilePageResize
       object NewFileTreeView: TTreeView
         Left = 0
-        Height = 218
+        Height = 219
         Top = 0
         Width = 249
         Align = alLeft
         BorderSpacing.Bottom = 5
-        DefaultItemHeight = 19
+        DefaultItemHeight = 15
         ReadOnly = True
         RightClickSelect = True
         TabOrder = 0
@@ -48,20 +48,20 @@ object AddToPackageDlg: TAddToPackageDlg
         AnchorSideLeft.Side = asrBottom
         AnchorSideRight.Side = asrBottom
         Left = 249
-        Height = 218
+        Height = 219
         Top = 0
-        Width = 249
+        Width = 243
         Align = alClient
         BorderSpacing.Bottom = 5
         Caption = 'NewFileDescriptionGroupBox'
-        ClientHeight = 199
+        ClientHeight = 201
-        ClientWidth = 245
+        ClientWidth = 239
         TabOrder = 1
         object NewFileHelpLabel: TLabel
           Left = 0
-          Height = 199
+          Height = 201
           Top = 0
-          Width = 245
+          Width = 239
           Align = alClient
           Caption = 'NewFileHelpLabel'
           ParentColor = False
@@ -71,19 +71,19 @@ object AddToPackageDlg: TAddToPackageDlg
       object NewFileBtnPanel: TPanel
         Left = 0
         Height = 50
-        Top = 223
+        Top = 224
-        Width = 498
+        Width = 492
         Align = alBottom
         BevelOuter = bvNone
         ClientHeight = 50
-        ClientWidth = 498
+        ClientWidth = 492
         TabOrder = 2
         object NewFileOkButton: TBitBtn
           AnchorSideBottom.Side = asrBottom
-          Left = 184
+          Left = 207
           Height = 38
           Top = 6
-          Width = 138
+          Width = 127
           Align = alRight
           Anchors = [akBottom]
           AutoSize = True
@@ -132,10 +132,10 @@ object AddToPackageDlg: TAddToPackageDlg
         end
         object NewFileCancelButton: TBitBtn
           AnchorSideLeft.Side = asrBottom
-          Left = 328
+          Left = 340
           Height = 38
           Top = 6
-          Width = 164
+          Width = 146
           Align = alRight
           AutoSize = True
           BorderSpacing.Around = 6
@@ -184,8 +184,8 @@ object AddToPackageDlg: TAddToPackageDlg
     end
     object AddUnitPage: TPage
       Caption = 'Add Unit'
-      ClientWidth = 498
+      ClientWidth = 492
-      ClientHeight = 273
+      ClientHeight = 274
       object AddUnitFilenameLabel: TLabel
         AnchorSideTop.Control = AddUnitFilenameEdit
         AnchorSideTop.Side = asrCenter
@@ -213,15 +213,14 @@ object AddToPackageDlg: TAddToPackageDlg
         Left = 111
         Height = 27
         Top = 5
-        Width = 307
+        Width = 301
         Anchors = [akTop, akLeft, akRight]
-        AutoSize = True
         TabOrder = 0
         Text = 'AddUnitFilenameEdit'
       end
       object AddUnitFileBrowseButton: TButton
         AnchorSideRight.Control = AddUnitFileShortenButton
-        Left = 418
+        Left = 412
         Height = 23
         Top = 5
         Width = 38
@@ -234,7 +233,7 @@ object AddToPackageDlg: TAddToPackageDlg
       object AddUnitFileShortenButton: TButton
         AnchorSideRight.Control = AddUnitPage
         AnchorSideRight.Side = asrBottom
-        Left = 456
+        Left = 450
         Height = 23
         Top = 5
         Width = 42
@@ -253,7 +252,6 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 27
         Top = 38
         Width = 156
-        AutoSize = True
         BorderSpacing.Top = 6
         TabOrder = 3
         Text = 'AddUnitSrcNameEdit'
@@ -451,8 +449,8 @@ object AddToPackageDlg: TAddToPackageDlg
     end
     object NewComponentPage: TPage
       Caption = 'New Component'
-      ClientWidth = 498
+      ClientWidth = 492
-      ClientHeight = 273
+      ClientHeight = 274
       object AncestorTypeLabel: TLabel
         AnchorSideTop.Control = AncestorComboBox
         AnchorSideTop.Side = asrCenter
@@ -510,9 +508,7 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 21
         Top = 5
         Width = 200
-        AutoComplete = False
+        ItemHeight = 13
-        ItemHeight = 0
-        ItemWidth = 0
         OnCloseUp = AncestorComboBoxCloseUp
         TabOrder = 0
         Text = 'AncestorComboBox'
@@ -541,7 +537,6 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 27
         Top = 32
         Width = 200
-        AutoSize = True
         BorderSpacing.Top = 6
         OnChange = ClassNameEditChange
         TabOrder = 2
@@ -556,10 +551,8 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 21
         Top = 65
         Width = 200
-        AutoComplete = False
         BorderSpacing.Top = 6
-        ItemHeight = 0
+        ItemHeight = 13
-        ItemWidth = 0
         TabOrder = 3
         Text = 'PalettePageCombobox'
       end
@@ -572,7 +565,6 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 27
         Top = 92
         Width = 129
-        AutoSize = True
         BorderSpacing.Top = 6
         TabOrder = 4
         Text = 'ComponentUnitFileEdit'
@@ -620,7 +612,6 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 27
         Top = 125
         Width = 156
-        AutoSize = True
         BorderSpacing.Top = 6
         TabOrder = 7
         Text = 'ComponentUnitNameEdit'
@@ -730,8 +721,8 @@ object AddToPackageDlg: TAddToPackageDlg
     end
     object NewRequirementPage: TPage
       Caption = 'New Requirement'
-      ClientWidth = 498
+      ClientWidth = 492
-      ClientHeight = 273
+      ClientHeight = 274
       object DependPkgNameLabel: TLabel
         AnchorSideTop.Control = DependPkgNameComboBox
         AnchorSideTop.Side = asrCenter
@@ -769,9 +760,7 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 21
         Top = 5
         Width = 215
-        AutoComplete = False
+        ItemHeight = 13
-        ItemHeight = 0
-        ItemWidth = 0
         TabOrder = 0
         Text = 'DependPkgNameComboBox'
       end
@@ -784,7 +773,6 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 27
         Top = 32
         Width = 100
-        AutoSize = True
         BorderSpacing.Top = 6
         TabOrder = 1
         Text = 'DependMinVersionEdit'
@@ -798,7 +786,6 @@ object AddToPackageDlg: TAddToPackageDlg
         Height = 27
         Top = 65
         Width = 100
-        AutoSize = True
         BorderSpacing.Top = 6
         TabOrder = 2
         Text = 'DependMaxVersionEdit'
@@ -908,8 +895,8 @@ object AddToPackageDlg: TAddToPackageDlg
     end
     object AddFilePage: TPage
       Caption = 'Add File'
-      ClientWidth = 498
+      ClientWidth = 492
-      ClientHeight = 273
+      ClientHeight = 274
       object AddFilenameLabel: TLabel
         AnchorSideTop.Control = AddFilenameEdit
         AnchorSideTop.Side = asrCenter
@@ -927,15 +914,14 @@ object AddToPackageDlg: TAddToPackageDlg
         Left = 92
         Height = 27
         Top = 5
-        Width = 326
+        Width = 320
         Anchors = [akTop, akLeft, akRight]
-        AutoSize = True
         TabOrder = 0
         Text = 'AddFilenameEdit'
       end
       object AddFileBrowseButton: TButton
         AnchorSideRight.Control = AddFileShortenButton
-        Left = 418
+        Left = 412
         Height = 23
         Top = 5
         Width = 38
@@ -948,7 +934,7 @@ object AddToPackageDlg: TAddToPackageDlg
       object AddFileShortenButton: TButton
         AnchorSideRight.Control = AddFilePage
         AnchorSideRight.Side = asrBottom
-        Left = 456
+        Left = 450
         Height = 23
         Top = 5
         Width = 42
@@ -1087,43 +1073,39 @@ object AddToPackageDlg: TAddToPackageDlg
     end
     object AddFilesPage: TPage
       Caption = 'Add Files'
-      ClientWidth = 498
+      ClientWidth = 492
-      ClientHeight = 273
+      ClientHeight = 274
       object FilesListView: TListView
         AnchorSideBottom.Control = FilesBrowseButton
         Left = 0
-        Height = 227
+        Height = 228
         Top = 0
-        Width = 498
+        Width = 492
         Align = alClient
         BorderSpacing.Bottom = 5
         Columns = <        
           item
-            AutoSize = False
             Caption = 'Filename'
             Width = 200
           end        
           item
-            AutoSize = False
             Caption = 'Type'
             Width = 280
           end>
         MultiSelect = True
-        SortColumn = 0
-        SortType = stNone
         TabOrder = 0
         ViewStyle = vsReport
       end
       object AddFilesBtnPanel: TPanel
         Left = 0
         Height = 41
-        Top = 232
+        Top = 233
-        Width = 498
+        Width = 492
         Align = alBottom
         AutoSize = True
         BevelOuter = bvNone
         ClientHeight = 41
-        ClientWidth = 498
+        ClientWidth = 492
         TabOrder = 1
         object FilesBrowseButton: TButton
           AnchorSideBottom.Side = asrBottom
@@ -1140,7 +1122,7 @@ object AddToPackageDlg: TAddToPackageDlg
         end
         object FilesAddButton: TButton
           AnchorSideLeft.Side = asrBottom
-          Left = 498
+          Left = 492
           Height = 29
           Top = 6
           Width = 107

packager/addtopackagedlg.pas

@@ -60,7 +60,7 @@ type
     AddType: TAddToPkgType;
     Dependency: TPkgDependency;
     UnitFilename: string;
-    AUnitName: string;
+    Unit_Name: string;
     AncestorType: string;
     NewClassName: string;
     PageName: string;
@@ -451,7 +451,7 @@ begin
     Params.AddType:=d2ptUnit;
 
     Params.UnitFilename:=AddUnitFilenameEdit.Text;
-    Params.AUnitName:=AddUnitSrcNameEdit.Text;
+    Params.Unit_Name:=AddUnitSrcNameEdit.Text;
     Params.FileType:=pftUnit;
     Params.PkgFileFlags:=[pffAddToPkgUsesSection];
     Params.AutoAddLFMFile:=AddSecondaryFilesCheckBox.Checked;
@@ -463,7 +463,7 @@ begin
     Params.AddType:=d2ptVirtualUnit;
 
     Params.UnitFilename:=ExtractFilename(AddUnitFilenameEdit.Text);
-    Params.AUnitName:=AddUnitSrcNameEdit.Text;
+    Params.Unit_Name:=AddUnitSrcNameEdit.Text;
     Params.FileType:=pftVirtualUnit;
     Params.PkgFileFlags:=[];
     Params.AutoAddLFMFile:=false;
@@ -476,11 +476,11 @@ begin
     OnGetIDEFileInfo,Params.UnitFilename) then exit;
     
   // check unitname
-  if CompareText(Params.AUnitName,ExtractFileNameOnly(Params.UnitFilename))<>0
+  if CompareText(Params.Unit_Name,ExtractFileNameOnly(Params.UnitFilename))<>0
   then begin
     MessageDlg(lisA2PInvalidUnitName,
       Format(lisA2PTheUnitNameAndFilenameDiffer, ['"',
-        Params.AUnitName, '"', #13, '"', Params.UnitFilename, '"']),
+        Params.Unit_Name, '"', #13, '"', Params.UnitFilename, '"']),
       mtError,[mbCancel],0);
     exit;
   end;
@@ -556,7 +556,7 @@ begin
   Params.AddType:=d2ptUnit;
   Params.UnitFilename:=Filename;
   Params.FileType:=pftText;
-  Params.AUnitName:='';
+  Params.Unit_Name:='';
   Params.PkgFileFlags:=[];
 
   if not FileExistsUTF8(Params.UnitFilename) then begin
@@ -776,18 +776,18 @@ begin
         CurParams.AutoAddLFMFile:=true;
         CurParams.AutoAddLRSFile:=true;
         if Assigned(OnGetUnitRegisterInfo) then begin
-          OnGetUnitRegisterInfo(Self,Filename,CurParams.AUnitName,HasRegisterProc);
+          OnGetUnitRegisterInfo(Self,Filename,CurParams.Unit_Name,HasRegisterProc);
           if HasRegisterProc then
             Include(CurParams.PkgFileFlags,pffHasRegisterProc);
         end;
 
         // check unitname
-        if CompareText(CurParams.AUnitName,
+        if CompareText(CurParams.Unit_Name,
           ExtractFileNameOnly(CurParams.UnitFilename))<>0
         then begin
           if MessageDlg(lisA2PInvalidUnitName,
               Format(lisA2PTheUnitNameAndFilenameDiffer, ['"',
-                CurParams.AUnitName, '"', #13, '"', CurParams.UnitFilename, '"']),
+                CurParams.Unit_Name, '"', #13, '"', CurParams.UnitFilename, '"']),
             mtError,[mbIgnore,mbCancel],0)<>mrIgnore
           then begin
             FilesListView.Items.Delete(i);
@@ -935,7 +935,7 @@ begin
   Params.AncestorType:=AncestorComboBox.Text;
   Params.NewClassName:=ClassNameEdit.Text;
   Params.PageName:=PalettePageCombobox.Text;
-  Params.AUnitName:=ComponentUnitNameEdit.Text;
+  Params.Unit_Name:=ComponentUnitNameEdit.Text;
   Params.UnitFilename:=ComponentUnitFileEdit.Text;
   Params.UsedUnitname:='';
 
@@ -958,11 +958,11 @@ begin
   end;
 
   // check unitname - filename redundancy
-  if AnsiCompareText(Params.AUnitname,ExtractFileNameOnly(Params.UnitFilename))<>0
+  if AnsiCompareText(Params.Unit_name,ExtractFileNameOnly(Params.UnitFilename))<>0
   then begin
     MessageDlg(lisA2PUnitNameInvalid,
       Format(lisA2PTheUnitNameDoesNotCorrespondToTheFilename, ['"',
-        Params.AUnitName, '"']),
+        Params.Unit_Name, '"']),
       mtError,[mbCancel],0);
     exit;
   end;
@@ -1651,7 +1651,7 @@ begin
   AddType:=d2ptUnit;
   Dependency:=nil;
   UnitFilename:='';
-  AUnitName:='';
+  Unit_Name:='';
   AncestorType:='';
   NewClassName:='';
   PageName:='';

packager/packagedefs.pas

@@ -243,7 +243,7 @@ type
     property LazPackage: TLazPackage read FPackage;
     property Removed: boolean read FRemoved write SetRemoved;
     property SourceDirectoryReferenced: boolean read FSourceDirectoryReferenced;
-    property AUnitName: string read FUnitName write FUnitName;
+    property Unit_Name: string read FUnitName write FUnitName;
   end;
   
   
@@ -1263,10 +1263,10 @@ begin
                            ChangeFileExt(ShortFilename2,''));
   if Result<>0 then exit;
   // if one is a unit, then it is higher
-  if (PkgFile1.AUnitName<>'') and (PkgFile2.AUnitName='') then begin
+  if (PkgFile1.Unit_Name<>'') and (PkgFile2.Unit_Name='') then begin
     Result:=-1;
     exit;
-  end else if (PkgFile1.AUnitName='') and (PkgFile2.AUnitName<>'') then begin
+  end else if (PkgFile1.Unit_Name='') and (PkgFile2.Unit_Name<>'') then begin
     Result:=1;
     exit;
   end;
@@ -2982,14 +2982,14 @@ begin
     for i:=0 to Cnt-1 do begin
       Result:=Files[i];
       if IgnorePkgFile=Result then continue;
-      if CompareText(Result.AUnitName,TheUnitName)=0 then exit;
+      if CompareText(Result.Unit_Name,TheUnitName)=0 then exit;
     end;
     if not IgnoreRemoved then begin
       Cnt:=RemovedFilesCount;
       for i:=0 to Cnt-1 do begin
         Result:=RemovedFiles[i];
         if IgnorePkgFile=Result then continue;
-        if CompareText(Result.AUnitName,TheUnitName)=0 then exit;
+        if CompareText(Result.Unit_Name,TheUnitName)=0 then exit;
       end;
     end;
   end;
@@ -3060,7 +3060,7 @@ begin
   end;
   with Result do begin
     Filename:=NewFilename;
-    AUnitName:=NewUnitName;
+    Unit_Name:=NewUnitName;
     FileType:=NewFileType;
     Flags:=NewFlags;
     NewComponentPriority:=ComponentPriorityNormal;
@@ -3086,7 +3086,7 @@ begin
   with Result do begin
     AutoReferenceSourceDir:=false;
     Filename:=NewFilename;
-    AUnitName:=NewUnitName;
+    Unit_Name:=NewUnitName;
     FileType:=NewFileType;
     Flags:=NewFlags;
     NewComponentPriority:=ComponentPriorityNormal;
@@ -3545,7 +3545,7 @@ function TPkgComponent.GetUnitName: string;
 var
   TIUnitName: String;
 begin
-  Result:=PkgFile.AUnitName;
+  Result:=PkgFile.Unit_Name;
   // compare with RTTI unit name
   if ComponentClass<>nil then begin
     TIUnitName:=GetClassUnitName(ComponentClass);
@@ -4357,7 +4357,7 @@ begin
   Result:=Root;
   while (Result<>nil) do begin
     PkgFile:=TPkgFile(Result.Data);
-    Comp:=CompareText(AUnitName,PkgFile.AUnitName);
+    Comp:=CompareText(AUnitName,PkgFile.Unit_Name);
     if Comp=0 then exit;
     if Comp<0 then begin
       Result:=Result.Left
@@ -4382,8 +4382,8 @@ end;
 function ComparePkgFilesUnitname(PkgFile1, PkgFile2: Pointer): integer;
 begin
   Result := CompareText(
-              TPkgFile(PkgFile1).AUnitName,
+              TPkgFile(PkgFile1).Unit_Name,
-              TPkgFile(PkgFile2).AUnitName);
+              TPkgFile(PkgFile2).Unit_Name);
 end;
 
 constructor TPkgUnitsTree.Create(ThePackage: TLazPackage);

packager/packageeditor.pas

@@ -955,7 +955,7 @@ procedure TPackageEditorForm.AddBitBtnClick(Sender: TObject);
     ExtendUnitIncPathForNewUnit(AddParams.UnitFilename,NewLRSFilename);
     // add unit file
     with AddParams do
-      FNextSelectedPart := LazPackage.AddFile(UnitFilename,AUnitName,
+      FNextSelectedPart := LazPackage.AddFile(UnitFilename,Unit_Name,
                                           FileType,PkgFileFlags,cpNormal);
     PackageEditors.DeleteAmbiguousFiles(LazPackage,AddParams.UnitFilename);
     UpdateAll;
@@ -964,7 +964,7 @@ procedure TPackageEditorForm.AddBitBtnClick(Sender: TObject);
   procedure AddVirtualUnit(AddParams: TAddToPkgResult);
   begin
     with AddParams do
-      FNextSelectedPart := LazPackage.AddFile(UnitFilename,AUnitName,FileType,
+      FNextSelectedPart := LazPackage.AddFile(UnitFilename,Unit_Name,FileType,
                                           PkgFileFlags,cpNormal);
     PackageEditors.DeleteAmbiguousFiles(LazPackage,AddParams.UnitFilename);
     UpdateAll;
@@ -975,7 +975,7 @@ procedure TPackageEditorForm.AddBitBtnClick(Sender: TObject);
     ExtendUnitIncPathForNewUnit(AddParams.UnitFilename,'');
     // add file
     with AddParams do
-      FNextSelectedPart := LazPackage.AddFile(UnitFilename,AUnitName,FileType,
+      FNextSelectedPart := LazPackage.AddFile(UnitFilename,Unit_Name,FileType,
                                           PkgFileFlags,cpNormal);
     // add dependency
     if AddParams.Dependency<>nil then begin
@@ -997,7 +997,7 @@ procedure TPackageEditorForm.AddBitBtnClick(Sender: TObject);
   begin
     // add file
     with AddParams do
-      FNextSelectedPart := LazPackage.AddFile(UnitFilename,AUnitName,FileType,
+      FNextSelectedPart := LazPackage.AddFile(UnitFilename,Unit_Name,FileType,
                                           PkgFileFlags,cpNormal);
     UpdateAll;
   end;

packager/packagesystem.pas

@@ -1679,7 +1679,7 @@ procedure TLazPackageGraph.ReplacePackage(OldPackage, NewPackage: TLazPackage);
     PkgComponent: TPkgComponent;
   begin
     if (OldPkgFile.ComponentCount>0) then begin
-      OldUnitName:=OldPkgFile.AUnitName;
+      OldUnitName:=OldPkgFile.Unit_Name;
       if OldUnitName='' then RaiseException('MoveInstalledComponents');
       NewPkgFile:=NewPackage.FindUnit(OldUnitName,false);
       if NewPkgFile=nil then begin
@@ -2228,7 +2228,7 @@ var
     PackageTreeOfUnitTrees.Add(Result);
     for i:=0 to Pkg.FileCount-1 do begin
       PkgFile:=Pkg.Files[i];
-      if (PkgFile.FileType in FileTypes) and (PkgFile.AUnitName<>'') then
+      if (PkgFile.FileType in FileTypes) and (PkgFile.Unit_Name<>'') then
         Result.Add(PkgFile);
     end;
   end;
@@ -2255,9 +2255,9 @@ var
     for i:=0 to Pkg1.FileCount-1 do begin
       PkgFile1:=Pkg1.Files[i];
       if (PkgFile1.FileType in FileTypes)
-      and (PkgFile1.AUnitName<>'') then begin
+      and (PkgFile1.Unit_Name<>'') then begin
         // check if a unit of Pkg1 exists in Pkg2
-        PkgFile2:=UnitsTreeOfPkg2.FindPkgFileWithUnitName(PkgFile1.AUnitName);
+        PkgFile2:=UnitsTreeOfPkg2.FindPkgFileWithUnitName(PkgFile1.Unit_Name);
         if PkgFile2<>nil then begin
           File1:=PkgFile1;
           File2:=PkgFile2;
@@ -2265,7 +2265,7 @@ var
           exit;
         end;
         // check if a unit of Pkg1 has the same name as Pkg2
-        if AnsiCompareText(PkgFile1.AUnitName,Pkg2.Name)=0 then begin
+        if AnsiCompareText(PkgFile1.Unit_Name,Pkg2.Name)=0 then begin
           File1:=PkgFile1;
           ConflictPkg:=Pkg2;
           Result:=true;
@@ -2349,7 +2349,7 @@ function TLazPackageGraph.FindFPCConflictUnit(APackage: TLazPackage;
       CurFile:=Pkg1.Files[i];
       if (CurFile.FileType in (PkgFileUnitTypes-[pftVirtualUnit]))
       and (pffAddToPkgUsesSection in CurFile.Flags) then begin
-        Result:=CheckUnitName(CurFile.AUnitName);
+        Result:=CheckUnitName(CurFile.Unit_Name);
         if Result then begin
           File1:=CurFile;
           exit;
@@ -3142,7 +3142,7 @@ begin
     for i:=0 to APackage.FileCount-1 do begin
       CurFile:=APackage.Files[i];
       if not (CurFile.FileType in PkgFileUnitTypes) then continue;
-      OutputFileName:=AppendPathDelim(OutputDir)+CurFile.AUnitName+'.ppu';
+      OutputFileName:=AppendPathDelim(OutputDir)+CurFile.Unit_Name+'.ppu';
       Result:=DeleteFileInteractive(OutputFileName,[mbIgnore,mbAbort]);
       if Result in [mrCancel,mrAbort] then exit;
     end;
@@ -3214,7 +3214,7 @@ begin
   for i:=0 to APackage.FileCount-1 do begin
     CurFile:=APackage.Files[i];
     if CurFile.FileType<>pftUnit then continue;
-    CurUnitName:=lowercase(CurFile.AUnitName);
+    CurUnitName:=lowercase(CurFile.Unit_Name);
     if CurUnitName='' then continue;
     Result:=CheckFile(CurUnitName+'.ppu');
     if Result<>mrOk then exit;
@@ -3291,13 +3291,13 @@ begin
           if SysUtils.CompareText(CurSrcUnitName,CurUnitName)<>0 then
             CurSrcUnitName:=CodeToolBoss.GetSourceName(CodeBuffer,false);
           // if it makes sense, update unitname
-          if SysUtils.CompareText(CurSrcUnitName,CurFile.AUnitName)=0 then
+          if SysUtils.CompareText(CurSrcUnitName,CurFile.Unit_Name)=0 then
-            CurFile.AUnitName:=CurSrcUnitName;
+            CurFile.Unit_Name:=CurSrcUnitName;
         end;
-        if SysUtils.CompareText(CurUnitName,CurFile.AUnitName)=0 then
+        if SysUtils.CompareText(CurUnitName,CurFile.Unit_Name)=0 then
-          CurUnitName:=CurFile.AUnitName
+          CurUnitName:=CurFile.Unit_Name
         else
-          CurFile.AUnitName:=CurUnitName;
+          CurFile.Unit_Name:=CurUnitName;
       end;
 
       if (CurUnitName<>'') and IsValidIdent(CurUnitName) then begin

packager/pkgmanager.pas

@@ -754,7 +754,7 @@ begin
   and (Params.UsedUnitname<>'') then
     UsesLine:=UsesLine+', '+Params.UsedUnitname;
   NewSource:=
-     'unit '+Params.AUnitName+';'+LE
+     'unit '+Params.Unit_Name+';'+LE
     +LE
     +'{$mode objfpc}{$H+}'+LE
     +LE
@@ -2249,7 +2249,7 @@ begin
         #13, #13, #13, #13, #13, #13, #13, #13]);
       for i:=0 to MissingUnits.Count-1 do begin
         PkgFile:=TPkgFile(MissingUnits[i]);
-        Msg:=Format(lisUnitInPackage, [Msg, PkgFile.AUnitName,
+        Msg:=Format(lisUnitInPackage, [Msg, PkgFile.Unit_Name,
           PkgFile.LazPackage.IDAsString, #13]);
       end;
       Result:=IDEMessageDialog(lisPackageNeedsInstallation,

packager/pkgvirtualuniteditor.lfm

@@ -7,9 +7,8 @@ object EditVirtualUnitDialog: TEditVirtualUnitDialog
   ClientHeight = 131
   ClientWidth = 450
   OnCreate = EditVirtualUnitDialogCreate
-  ParentFont = False
   Position = poScreenCenter
-  LCLVersion = '0.9.25'
+  LCLVersion = '0.9.29'
   object FilenameLabel: TLabel
     Left = 8
     Height = 14
@@ -28,7 +27,7 @@ object EditVirtualUnitDialog: TEditVirtualUnitDialog
   end
   object FilenameEdit: TEdit
     Left = 96
-    Height = 23
+    Height = 21
     Top = 18
     Width = 344
     Anchors = [akTop, akLeft, akRight]
@@ -37,7 +36,7 @@ object EditVirtualUnitDialog: TEditVirtualUnitDialog
   end
   object UnitnameEdit: TEdit
     Left = 96
-    Height = 23
+    Height = 21
     Top = 58
     Width = 128
     TabOrder = 1

packager/pkgvirtualuniteditor.lrs

@@ -4,111 +4,111 @@ LazarusResources.Add('TEditVirtualUnitDialog','FORMDATA',[
   'TPF0'#22'TEditVirtualUnitDialog'#21'EditVirtualUnitDialog'#4'Left'#3'Z'#1#6
   +'Height'#3#131#0#3'Top'#3#254#0#5'Width'#3#194#1#7'Caption'#6#21'EditVirtual'
   +'UnitDialog'#12'ClientHeight'#3#131#0#11'ClientWidth'#3#194#1#8'OnCreate'#7
-  +#27'EditVirtualUnitDialogCreate'#10'ParentFont'#8#8'Position'#7#14'poScreenC'
+  +#27'EditVirtualUnitDialogCreate'#8'Position'#7#14'poScreenCenter'#10'LCLVers'
-  +'enter'#10'LCLVersion'#6#6'0.9.25'#0#6'TLabel'#13'FilenameLabel'#4'Left'#2#8
+  +'ion'#6#6'0.9.29'#0#6'TLabel'#13'FilenameLabel'#4'Left'#2#8#6'Height'#2#14#3
-  +#6'Height'#2#14#3'Top'#2#24#5'Width'#2'D'#7'Caption'#6#13'FilenameLabel'#11
+  +'Top'#2#24#5'Width'#2'D'#7'Caption'#6#13'FilenameLabel'#11'ParentColor'#8#0#0
-  +'ParentColor'#8#0#0#6'TLabel'#13'UnitnameLabel'#4'Left'#2#8#6'Height'#2#14#3
+  +#6'TLabel'#13'UnitnameLabel'#4'Left'#2#8#6'Height'#2#14#3'Top'#2'@'#5'Width'
-  +'Top'#2'@'#5'Width'#2'G'#7'Caption'#6#13'UnitnameLabel'#11'ParentColor'#8#0#0
+  +#2'G'#7'Caption'#6#13'UnitnameLabel'#11'ParentColor'#8#0#0#5'TEdit'#12'Filen'
-  +#5'TEdit'#12'FilenameEdit'#4'Left'#2'`'#6'Height'#2#23#3'Top'#2#18#5'Width'#3
+  +'ameEdit'#4'Left'#2'`'#6'Height'#2#21#3'Top'#2#18#5'Width'#3'X'#1#7'Anchors'
-  +'X'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#0#4'Text'#6
+  +#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#0#4'Text'#6#12'FilenameEdi'
-  +#12'FilenameEdit'#0#0#5'TEdit'#12'UnitnameEdit'#4'Left'#2'`'#6'Height'#2#23#3
+  +'t'#0#0#5'TEdit'#12'UnitnameEdit'#4'Left'#2'`'#6'Height'#2#21#3'Top'#2':'#5
-  +'Top'#2':'#5'Width'#3#128#0#8'TabOrder'#2#1#4'Text'#6#12'UnitnameEdit'#0#0#7
+  +'Width'#3#128#0#8'TabOrder'#2#1#4'Text'#6#12'UnitnameEdit'#0#0#7'TBitBtn'#12
-  +'TBitBtn'#12'CancelButton'#4'Left'#3'L'#1#6'Height'#2#25#3'Top'#2'`'#5'Width'
+  +'CancelButton'#4'Left'#3'L'#1#6'Height'#2#25#3'Top'#2'`'#5'Width'#2'e'#7'Cap'
-  +#2'e'#7'Caption'#6#12'CancelButton'#10'Glyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'
+  +'tion'#6#12'CancelButton'#10'Glyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0
-  +#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0
+  +#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'
-  +'d'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
-  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +'?='#237'A;8'#235#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0'!'#31#227#8#30#28#226'A'#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0'JG'#240'AOL'#242#255'@>'#237
-  +#253'<9'#235#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'''%'
-  +#229#8'$"'#228#252'1/'#234#255#31#29#226'A'#255#255#255#0#255#255#255#0#255
-  +#255#255#0'TQ'#243'AXV'#245#255'ca'#250#255'XU'#246#255'A?'#237#252'=:'#236#8
-  +#255#255#255#0#255#255#255#0'0-'#231#8',*'#230#252'A?'#241#255'LJ'#246#255'1'
-  +'/'#234#255#31#29#226'A'#255#255#255#0#255#255#255#0'YV'#245'+[X'#246#255'eb'
-  +#250#255'qp'#255#255'YV'#246#255'B@'#238#252'>;'#236#8'97'#235#8'52'#233#252
-  +'GE'#242#255'cb'#255#255'JH'#244#255'/-'#233#255'" '#227'+'#255#255#255#0#255
-  +#255#255#0#255#255#255#0'ZW'#245'+[Y'#246#255'fc'#250#255'tq'#255#255'ZX'#246
-  +#255'CA'#238#252'><'#236#253'PM'#244#255'hg'#255#255'PN'#245#255'64'#235#255
-  +'*'''#229'+'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0'[X'#246'+\Z'#246#255'gd'#250#255'tr'#255#255'sp'#255#255'pn'#255#255
-  +'nl'#255#255'WU'#247#255'?='#238#255'20'#232'+'#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'\Y'
-  +#246'+]['#247#255'yv'#255#255'YV'#255#255'WT'#255#255'rp'#255#255'HF'#240#255
-  +'<9'#235'+'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0'a^'#248#8']Z'#246#253'}y'
-  +#255#255'^['#255#255'[X'#255#255'vt'#255#255'FC'#239#253'A?'#237#8#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#255#255#255#0'ig'#251#8'fc'#249#252'pm'#251#255#128'~'#255#255'~{'#255#255
-  +'|y'#255#255'yw'#255#255'^\'#247#255'GD'#239#252'B@'#238#8#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'qn'#253#8'nk'#252#252'w'
-  +'t'#253#255#134#130#255#255'vs'#252#255'db'#248#255'`]'#247#255'mj'#250#255
-  +'{y'#255#255'`]'#247#255'HE'#239#252'CA'#238#8#255#255#255#0#255#255#255#0
-  +#255#255#255#0'vs'#255#8'tq'#254#253'}z'#254#255#138#135#255#255'|y'#253#255
-  +'li'#251#255'ca'#249'+_\'#247'+a^'#248#255'nl'#250#255'}z'#255#255'a_'#247
-  +#255'IF'#240#252'DA'#238#5#255#255#255#0#255#255#255#0'wt'#255#31'zw'#255#255
-  +#129'~'#255#255#129'~'#254#255'tq'#253#255'li'#251'+'#255#255#255#0#255#255
-  +#255#0'`]'#247'+b_'#248#255'om'#251#255'~|'#255#255'b_'#248#255'JG'#240'oEB'
-  +#238#2#255#255#255#0#255#255#255#0'wt'#255#31'zw'#255#255'yv'#254#255'ro'#253
-  +'+'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'a^'#248'+da'#248
-  +#255'jh'#249#255'TQ'#243#168'OM'#242')'#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0'wt'#255#31'wt'#255'+'#255#255#255#0#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'b_'#248'+]['#247'oYV'
-  +#245'>'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'c`'#248#10#255#255#255#0
-  +#255#255#255#0#255#255#255#0#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'
-  +#2#2#0#0#7'TBitBtn'#8'OkButton'#4'Left'#3#200#0#6'Height'#2#25#3'Top'#2'`'#5
-  +'Width'#2'e'#7'Caption'#6#8'OkButton'#10'Glyph.Data'#10':'#4#0#0'6'#4#0#0'BM'
-  +'6'#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0
-  +#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255
   +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
-  ,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'?='#237'A;8'
-  +#255#255#255#0#255#255#255#0'1z6'#10'-u2'#7#255#255#255#0#255#255#255#0#255
+  +#235#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0'!'#31#227#8#30#28#226'A'#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0'JG'#240'AOL'#242#255'@>'#237#253'<9'#235#8
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'''%'#229#8'$"'#228
+  +#252'1/'#234#255#31#29#226'A'#255#255#255#0#255#255#255#0#255#255#255#0'TQ'
+  +#243'AXV'#245#255'ca'#250#255'XU'#246#255'A?'#237#252'=:'#236#8#255#255#255#0
+  +#255#255#255#0'0-'#231#8',*'#230#252'A?'#241#255'LJ'#246#255'1/'#234#255#31
+  +#29#226'A'#255#255#255#0#255#255#255#0'YV'#245'+[X'#246#255'eb'#250#255'qp'
+  +#255#255'YV'#246#255'B@'#238#252'>;'#236#8'97'#235#8'52'#233#252'GE'#242#255
+  +'cb'#255#255'JH'#244#255'/-'#233#255'" '#227'+'#255#255#255#0#255#255#255#0
+  +#255#255#255#0'ZW'#245'+[Y'#246#255'fc'#250#255'tq'#255#255'ZX'#246#255'CA'
+  +#238#252'><'#236#253'PM'#244#255'hg'#255#255'PN'#245#255'64'#235#255'*'''#229
+  +'+'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'[X'
+  +#246'+\Z'#246#255'gd'#250#255'tr'#255#255'sp'#255#255'pn'#255#255'nl'#255#255
+  +'WU'#247#255'?='#238#255'20'#232'+'#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'\Y'#246'+]['#247#255
+  +'yv'#255#255'YV'#255#255'WT'#255#255'rp'#255#255'HF'#240#255'<9'#235'+'#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0'a^'#248#8']Z'#246#253'}y'#255#255'^['#255
+  +#255'[X'#255#255'vt'#255#255'FC'#239#253'A?'#237#8#255#255#255#0#255#255#255
+  +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'ig'
+  +#251#8'fc'#249#252'pm'#251#255#128'~'#255#255'~{'#255#255'|y'#255#255'yw'#255
+  +#255'^\'#247#255'GD'#239#252'B@'#238#8#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0'qn'#253#8'nk'#252#252'wt'#253#255#134#130
+  +#255#255'vs'#252#255'db'#248#255'`]'#247#255'mj'#250#255'{y'#255#255'`]'#247
+  +#255'HE'#239#252'CA'#238#8#255#255#255#0#255#255#255#0#255#255#255#0'vs'#255
+  +#8'tq'#254#253'}z'#254#255#138#135#255#255'|y'#253#255'li'#251#255'ca'#249'+'
+  +'_\'#247'+a^'#248#255'nl'#250#255'}z'#255#255'a_'#247#255'IF'#240#252'DA'#238
+  +#5#255#255#255#0#255#255#255#0'wt'#255#31'zw'#255#255#129'~'#255#255#129'~'
+  +#254#255'tq'#253#255'li'#251'+'#255#255#255#0#255#255#255#0'`]'#247'+b_'#248
+  +#255'om'#251#255'~|'#255#255'b_'#248#255'JG'#240'oEB'#238#2#255#255#255#0#255
+  +#255#255#0'wt'#255#31'zw'#255#255'yv'#254#255'ro'#253'+'#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0'a^'#248'+da'#248#255'jh'#249#255'TQ'
+  +#243#168'OM'#242')'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +'wt'#255#31'wt'#255'+'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
+  +#0#255#255#255#0#255#255#255#0'b_'#248'+]['#247'oYV'#245'>'#255#255#255#0#255
   +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
   +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +'9'#133'@'#10'7'#131'='#255'1{7'#251'.v3'#7#255#255#255#0#255#255#255#0#255
+  +#255#255#255#0#255#255#255#0'c`'#248#10#255#255#255#0#255#255#255#0#255#255
+  +#255#0#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#2#0#0#7'TBitBtn'#8
+  +'OkButton'#4'Left'#3#200#0#6'Height'#2#25#3'Top'#2'`'#5'Width'#2'e'#7'Captio'
+  +'n'#6#8'OkButton'#10'Glyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0
+  +#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0
+  +#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
   +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0'B'#146'I'#10'@'#142'G'#255
+  ,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +'T'#163'\'#255'O'#159'W'#255'2|8'#254'.w4'#8#255#255#255#0#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0'K'#158'S'#10'I'#154'Q'#255'['#172'd'#255'w'#202#130#255
-  +'t'#200'~'#255'Q'#160'Y'#255'3}9'#254'/x5'#8#255#255#255#0#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'S'#169'\'
-  +#10'Q'#166'Z'#255'c'#181'm'#255'~'#206#137#255'{'#204#135#255'v'#202#129#255
-  +'v'#201#129#255'R'#162'Z'#255'4~:'#254'0y5'#8#255#255#255#0#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0'Z'#180'e'#9'Y'#176'c'#255'k'#189'v'
-  +#255#132#210#144#255'z'#201#133#255'`'#178'j'#255'c'#180'm'#255'x'#201#131
-  +#255'x'#203#130#255'S'#163'\'#255'4:'#253'1z6'#8#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0'^'#185'iF['#181'f'#228'y'#201#134#255#128#206
-  +#141#255'Q'#166'Z'#252'M'#161'VoI'#156'Q'#139'\'#173'g'#255'|'#204#134#255'y'
-  +#203#133#255'T'#164']'#255'5'#128';'#252'1{7'#8#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0'_'#186'j<\'#182'f'#230'm'#192'y'#255'U'#172'_o'
-  +#255#255#255#0#255#255#255#0'J'#157'R'#145'^'#174'h'#255'}'#205#137#255'|'
-  +#205#135#255'V'#165'_'#255'6'#129'<'#252'2|8'#8#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0'_'#187'jC\'#183'ge'#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0'K'#158'S'#145'_'#175'i'#255''#206#138#255'~'
-  +#206#137#255'W'#166'`'#255'7'#130'='#252'3}9'#8#255#255#255#0#255#255#255#0
   +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0'K'#159'T'#145'`'#176'j'#255#129#207
+  +#255#255#0'1z6'#10'-u2'#7#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#141#255''#207#139#255'X'#167'a'#255'9'#133'@'#255'4~:'#8#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0'L'#160'U'#145'b'#178'l'#255
-  +#130#209#143#255'z'#200#133#255'W'#166'`'#255'8'#132'?{'#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'M'#161'V'#145
-  +'c'#179'm'#255'_'#175'i'#255'A'#145'Iy'#255#255#255#0#255#255#255#0#255#255
   +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'N'#162
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'9'#133'@'#10'7'#131
-  +'W'#145'J'#157'R'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +'='#255'1{7'#251'.v3'#7#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
+  +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0'B'#146'I'#10'@'#142'G'#255'T'#163'\'#255'O'#159'W'
+  +#255'2|8'#254'.w4'#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'K'#158
+  +'S'#10'I'#154'Q'#255'['#172'd'#255'w'#202#130#255't'#200'~'#255'Q'#160'Y'#255
+  +'3}9'#254'/x5'#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0'S'#169'\'#10'Q'#166'Z'#255'c'#181'm'
+  +#255'~'#206#137#255'{'#204#135#255'v'#202#129#255'v'#201#129#255'R'#162'Z'
+  +#255'4~:'#254'0y5'#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0'Z'#180'e'#9'Y'#176'c'#255'k'#189'v'#255#132#210#144#255'z'#201
+  +#133#255'`'#178'j'#255'c'#180'm'#255'x'#201#131#255'x'#203#130#255'S'#163'\'
+  +#255'4'#127':'#253'1z6'#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0'^'#185'iF['#181'f'#228'y'#201#134#255#128#206#141#255'Q'#166'Z'#252'M'
+  +#161'VoI'#156'Q'#139'\'#173'g'#255'|'#204#134#255'y'#203#133#255'T'#164']'
+  +#255'5'#128';'#252'1{7'#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0'_'#186'j<\'#182'f'#230'm'#192'y'#255'U'#172'_o'#255#255#255#0#255#255
+  +#255#0'J'#157'R'#145'^'#174'h'#255'}'#205#137#255'|'#205#135#255'V'#165'_'
+  +#255'6'#129'<'#252'2|8'#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0'_'#187'jC\'#183'ge'#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0'K'#158'S'#145'_'#175'i'#255#127#206#138#255'~'#206#137#255'W'#166'`'
+  +#255'7'#130'='#252'3}9'#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0'K'#159'T'#145'`'#176'j'#255#129#207#141#255#127#207#139#255'X'
+  +#167'a'#255'9'#133'@'#255'4~:'#8#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0'L'#160'U'#145'b'#178'l'#255#130#209#143#255'z'#200
+  +#133#255'W'#166'`'#255'8'#132'?{'#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0'M'#161'V'#145'c'#179'm'#255'_'#175'i'
+  +#255'A'#145'Iy'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0'N'#162'W'#145'J'#157'R'#127
   +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
   +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
   +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
   +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
   +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9'NumGlyphs'#2#0#7'OnClick'
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#7#13'OkButtonClick'#8'TabOrder'#2#3#0#0#0
+  +#255#255#255#0#255#255#255#0#9'NumGlyphs'#2#0#7'OnClick'#7#13'OkButtonClick'
+  +#8'TabOrder'#2#3#0#0#0
 ]);

packager/pkgvirtualuniteditor.pas

@@ -132,9 +132,9 @@ begin
 
   // commit
   if (PkgFile.Filename<>NewFilename)
-  or (PkgFile.AUnitname<>NewUnitName) then begin
+  or (PkgFile.Unit_name<>NewUnitName) then begin
     PkgFile.Filename:=NewFilename;
-    PkgFile.AUnitname:=NewUnitName;
+    PkgFile.Unit_name:=NewUnitName;
     if LazPackage<>nil then LazPackage.Modified:=true;
   end;
   
@@ -147,7 +147,7 @@ begin
   FPkgFile:=AValue;
   if PkgFile<>nil then begin
     FilenameEdit.Text:=PkgFile.Filename;
-    UnitnameEdit.Text:=PkgFile.AUnitName;
+    UnitnameEdit.Text:=PkgFile.Unit_Name;
   end;
 end;
 

packager/ucomponentmanmain.lfm

@@ -12,8 +12,7 @@ object FrmComponentMan: TFrmComponentMan
   OnCreate = FrmMainCREATE
   OnDestroy = FrmMainDESTROY
   OnShow = FrmMainSHOW
-  ParentFont = False
+  LCLVersion = '0.9.29'
-  LCLVersion = '0.9.25'
   object Label1: TLabel
     Left = 12
     Height = 14
@@ -80,6 +79,7 @@ object FrmComponentMan: TFrmComponentMan
     Width = 240
     HelpType = htKeyword
     Anchors = [akTop, akLeft, akRight, akBottom]
+    ItemHeight = 0
     OnClick = ListCompsCLICK
     Sorted = True
     TabOrder = 0
@@ -115,7 +115,7 @@ object FrmComponentMan: TFrmComponentMan
   end
   object TxtPage: TEdit
     Left = 264
-    Height = 23
+    Height = 21
     Top = 128
     Width = 232
     HelpType = htKeyword

packager/ucomponentmanmain.lrs

@@ -6,139 +6,139 @@ LazarusResources.Add('TFrmComponentMan','FORMDATA',[
   +'omponent Manager for Lazarus'#12'ClientHeight'#3'6'#1#11'ClientWidth'#3#3#2
   +#21'Constraints.MinHeight'#3'6'#1#20'Constraints.MinWidth'#3#2#2#8'OnCreate'
   +#7#13'FrmMainCREATE'#9'OnDestroy'#7#14'FrmMainDESTROY'#6'OnShow'#7#11'FrmMai'
-  +'nSHOW'#10'ParentFont'#8#10'LCLVersion'#6#6'0.9.25'#0#6'TLabel'#6'Label1'#4
+  +'nSHOW'#10'LCLVersion'#6#6'0.9.29'#0#6'TLabel'#6'Label1'#4'Left'#2#12#6'Heig'
-  +'Left'#2#12#6'Height'#2#14#3'Top'#2#8#5'Width'#2'm'#8'HelpType'#7#9'htKeywor'
+  +'ht'#2#14#3'Top'#2#8#5'Width'#2'm'#8'HelpType'#7#9'htKeyword'#7'Caption'#6#21
-  +'d'#7'Caption'#6#21'Installed Components:'#11'ParentColor'#8#0#0#6'TLabel'#6
+  +'Installed Components:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label2'#4'Left'#3
-  +'Label2'#4'Left'#3#143#1#6'Height'#2#14#3'Top'#2#20#5'Width'#2'Z'#8'HelpType'
+  +#143#1#6'Height'#2#14#3'Top'#2#20#5'Width'#2'Z'#8'HelpType'#7#9'htKeyword'#7
-  +#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#15'Componen'
+  +'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#15'Component Name:'#11'Paren'
-  +'t Name:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label3'#4'Left'#3'2'#1#6'Height'
+  +'tColor'#8#0#0#6'TLabel'#6'Label3'#4'Left'#3'2'#1#6'Height'#2#14#3'Top'#3#165
-  +#2#14#3'Top'#3#165#0#5'Width'#2'9'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5
+  +#0#5'Width'#2'9'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'
-  +'akTop'#7'akRight'#0#7'Caption'#6#12'Pascal Unit:'#11'ParentColor'#8#0#0#6'T'
+  +#0#7'Caption'#6#12'Pascal Unit:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label4'#4
-  +'Label'#6'Label4'#4'Left'#3'>'#1#6'Height'#2#14#3'Top'#2'`'#5'Width'#2#29#8
+  +'Left'#3'>'#1#6'Height'#2#14#3'Top'#2'`'#5'Width'#2#29#8'HelpType'#7#9'htKey'
-  +'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#5
+  +'word'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#5'Page:'#11'ParentCo'
-  +'Page:'#11'ParentColor'#8#0#0#6'TLabel'#12'LblComponent'#4'Left'#3#171#1#6'H'
+  +'lor'#8#0#0#6'TLabel'#12'LblComponent'#4'Left'#3#171#1#6'Height'#2#14#3'Top'
-  +'eight'#2#14#3'Top'#2'8'#5'Width'#2'E'#8'HelpType'#7#9'htKeyword'#7'Anchors'
+  +#2'8'#5'Width'#2'E'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRi'
-  +#11#5'akTop'#7'akRight'#0#7'Caption'#6#12'LblComponent'#11'ParentColor'#8#0#0
+  +'ght'#0#7'Caption'#6#12'LblComponent'#11'ParentColor'#8#0#0#6'TLabel'#7'LblU'
-  +#6'TLabel'#7'LblUnit'#4'Left'#3#176#1#6'Height'#2#14#3'Top'#3#208#0#5'Width'
+  +'nit'#4'Left'#3#176#1#6'Height'#2#14#3'Top'#3#208#0#5'Width'#2'!'#8'HelpType'
-  +#2'!'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Capti'
+  +#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#7'LblUnit'
-  +'on'#6#7'LblUnit'#11'ParentColor'#8#0#0#8'TListBox'#9'ListComps'#4'Left'#2#12
+  +#11'ParentColor'#8#0#0#8'TListBox'#9'ListComps'#4'Left'#2#12#6'Height'#3#215
-  +#6'Height'#3#215#0#3'Top'#2'('#5'Width'#3#240#0#8'HelpType'#7#9'htKeyword'#7
+  +#0#3'Top'#2'('#5'Width'#3#240#0#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'a'
-  +'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'OnClick'#7#14'Lis'
+  +'kTop'#6'akLeft'#7'akRight'#8'akBottom'#0#10'ItemHeight'#2#0#7'OnClick'#7#14
-  +'tCompsCLICK'#6'Sorted'#9#8'TabOrder'#2#0#0#0#7'TBitBtn'#9'BtnCancel'#4'Left'
+  +'ListCompsCLICK'#6'Sorted'#9#8'TabOrder'#2#0#0#0#7'TBitBtn'#9'BtnCancel'#4'L'
-  +#3#136#1#6'Height'#2#31#3'Top'#3#11#1#5'Width'#2'a'#8'HelpType'#7#9'htKeywor'
+  +'eft'#3#136#1#6'Height'#2#31#3'Top'#3#11#1#5'Width'#2'a'#8'HelpType'#7#9'htK'
-  +'d'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#6'Cancel'#4'Kind'#7#8
+  +'eyword'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#6'Cancel'#4'Kin'
-  +'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#7'OnClick'#7#14'BtnCancelCLI'
+  +'d'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#7'OnClick'#7#14'BtnCa'
-  +'CK'#8'TabOrder'#2#1#0#0#7'TBitBtn'#7'Bitbtn2'#4'Left'#3'%'#1#6'Height'#2#31
+  +'ncelCLICK'#8'TabOrder'#2#1#0#0#7'TBitBtn'#7'Bitbtn2'#4'Left'#3'%'#1#6'Heigh'
-  +#3'Top'#3#11#1#5'Width'#2'Q'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#7'akRi'
+  +'t'#2#31#3'Top'#3#11#1#5'Width'#2'Q'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11
-  +'ght'#8'akBottom'#0#7'Caption'#6#4'Save'#7'Default'#9#4'Kind'#7#4'bkOK'#11'M'
+  +#7'akRight'#8'akBottom'#0#7'Caption'#6#4'Save'#7'Default'#9#4'Kind'#7#4'bkOK'
-  +'odalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#12'Bitbtn2CLICK'#8'TabOrder'#2
+  +#11'ModalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#12'Bitbtn2CLICK'#8'TabOrd'
-  +#2#0#0#5'TEdit'#7'TxtPage'#4'Left'#3#8#1#6'Height'#2#23#3'Top'#3#128#0#5'Wid'
+  +'er'#2#2#0#0#5'TEdit'#7'TxtPage'#4'Left'#3#8#1#6'Height'#2#21#3'Top'#3#128#0
-  +'th'#3#232#0#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#8
+  +#5'Width'#3#232#0#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRigh'
-  +'OnChange'#7#13'TxtPageCHANGE'#8'TabOrder'#2#3#0#0#7'TBitBtn'#7'Button1'#4'L'
+  +'t'#0#8'OnChange'#7#13'TxtPageCHANGE'#8'TabOrder'#2#3#0#0#7'TBitBtn'#7'Butto'
-  +'eft'#2#24#6'Height'#2#31#3'Top'#3#11#1#5'Width'#2'K'#8'HelpType'#7#9'htKeyw'
+  +'n1'#4'Left'#2#24#6'Height'#2#31#3'Top'#3#11#1#5'Width'#2'K'#8'HelpType'#7#9
-  +'ord'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6#7'Add New'#10'Glyph'
+  +'htKeyword'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6#7'Add New'#10
-  +'.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16
+  +'Glyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0
-  +#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255#255#255
+  +#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255
-  +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
   +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
   +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0#255#255#255#0'A'#146'N#='#143'I}:'#140'D'#219'6'
-  +#137'@'#243'2'#135'<'#243'/'#132'7'#219','#129'3}(0#'#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +'I'#153'XSE'#150'S'#230'A'#153'P'#255'}'#194#143#255#150#208#166#255#150#207
-  +#166#255'x'#190#137#255'6'#141'B'#255','#129'4'#230')0S'#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'Q'#159'aSM'#156']'#244
-  +'d'#180'x'#255#168#219#181#255#135#204#152#255'f'#188'}'#255'd'#186'|'#255
-  +#134#203#152#255#165#217#180#255'X'#170'k'#255','#129'4'#244')0S'#255#255
-  +#255#0#255#255#255#0#255#255#255#0'Y'#166'k"V'#163'f'#229'j'#185'}'#255#168
-  +#219#178#255'`'#188'w'#255'\'#186's'#255'Y'#184'p'#255'Y'#181'o'#255'X'#181
-  +'o'#255'['#183't'#255#165#217#179#255'Z'#170'l'#255','#130'4'#229')0"'#255
-  +#255#255#0#255#255#255#0']'#169'p~S'#171'h'#255#170#221#180#255'd'#193'y'#255
-  +'_'#190'q'#255'`'#188'w'#255#255#255#255#255#255#255#255#255'Y'#184'p'#255'X'
-  +#181'n'#255'\'#183't'#255#166#218#180#255'8'#143'C'#255','#130'4~'#255#255
-  +#255#0#255#255#255#0'a'#172'u'#219#138#204#152#255#137#211#150#255'k'#198'z'
-  +#255'c'#193'p'#255'U'#171'e'#255#255#255#255#255#255#255#255#255'Y'#184'p'
-  +#255'Y'#184'p'#255'['#185'r'#255#133#204#151#255'{'#190#141#255'0'#133'9'#219
-  +#255#255#255#0#255#255#255#0'e'#175'z'#246#169#221#179#255'}'#207#138#255'u'
-  +#204#129#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
-  +#255#255#255#255#255#255#255#255'Y'#184'p'#255'g'#190'}'#255#156#212#171#255
-  +'4'#136'='#246#255#255#255#0#255#255#255#0'i'#178'~'#246#182#226#190#255#139
-  +#213#151#255'z'#201#134#255#255#255#255#255#255#255#255#255#255#255#255#255
-  +#255#255#255#255#255#255#255#255#255#255#255#255'Y'#184'p'#255'i'#193'~'#255
-  ,#157#212#170#255'8'#139'B'#246#255#255#255#0#255#255#255#0'm'#181#131#219#172
-  +#221#182#255#166#223#175#255#129#203#140#255'|'#201#134#255'n'#189'y'#255#255
-  +#255#255#255#255#255#255#255'['#172'j'#255'`'#188'w'#255'\'#186's'#255#139
-  +#209#153#255#128#197#146#255'<'#142'G'#219#255#255#255#0#255#255#255#0'p'#184
-  +#135'~'#133#199#151#255#210#238#215#255#149#217#160#255#138#211#148#255''
-  +#200#137#255#255#255#255#255#255#255#255#255'y'#205#133#255'k'#195'|'#255'o'
-  +#199'~'#255#172#223#181#255'E'#158'W'#255'@'#145'L~'#255#255#255#0#255#255
-  +#255#0's'#186#138'"p'#184#135#229#170#218#183#255#216#241#220#255#146#216#157
-  +#255#136#205#147#255#132#204#142#255#139#212#150#255#138#212#149#255#131#210
-  +#142#255#175#224#183#255'k'#185'}'#255'H'#152'V'#229'D'#148'Q"'#255#255#255#0
-  +#255#255#255#0#255#255#255#0's'#187#139'Sp'#184#135#244#175#220#187#255#220
-  +#242#224#255#182#228#189#255#155#219#165#255#150#217#160#255#165#223#175#255
-  +#192#232#197#255'y'#194#138#255'P'#158'_'#244'L'#155'[S'#255#255#255#0#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0's'#187#139'Sq'#184#135
-  +#230#148#206#164#255#195#230#203#255#207#235#212#255#201#233#206#255#175#221
-  +#184#255'm'#185''#255'X'#165'i'#230'T'#161'eS'#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0't'#187
-  +#139'#q'#185#136'}n'#182#132#219'j'#179#128#243'g'#177'|'#243'c'#174'w'#219
-  +'`'#171's}\'#168'n#'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
   +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'A'#146'N#='#143'I}:'#140
+  +'D'#219'6'#137'@'#243'2'#135'<'#243'/'#132'7'#219','#129'3}('#127'0#'#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0'I'#153'XSE'#150'S'#230'A'#153'P'#255'}'#194#143#255#150#208
+  +#166#255#150#207#166#255'x'#190#137#255'6'#141'B'#255','#129'4'#230')'#127'0'
+  +'S'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'Q'
+  +#159'aSM'#156']'#244'd'#180'x'#255#168#219#181#255#135#204#152#255'f'#188'}'
+  +#255'd'#186'|'#255#134#203#152#255#165#217#180#255'X'#170'k'#255','#129'4'
+  +#244')'#127'0S'#255#255#255#0#255#255#255#0#255#255#255#0'Y'#166'k"V'#163'f'
+  +#229'j'#185'}'#255#168#219#178#255'`'#188'w'#255'\'#186's'#255'Y'#184'p'#255
+  +'Y'#181'o'#255'X'#181'o'#255'['#183't'#255#165#217#179#255'Z'#170'l'#255','
+  +#130'4'#229')'#127'0"'#255#255#255#0#255#255#255#0']'#169'p~S'#171'h'#255#170
+  +#221#180#255'd'#193'y'#255'_'#190'q'#255'`'#188'w'#255#255#255#255#255#255
+  +#255#255#255'Y'#184'p'#255'X'#181'n'#255'\'#183't'#255#166#218#180#255'8'#143
+  +'C'#255','#130'4~'#255#255#255#0#255#255#255#0'a'#172'u'#219#138#204#152#255
+  +#137#211#150#255'k'#198'z'#255'c'#193'p'#255'U'#171'e'#255#255#255#255#255
+  +#255#255#255#255'Y'#184'p'#255'Y'#184'p'#255'['#185'r'#255#133#204#151#255'{'
+  +#190#141#255'0'#133'9'#219#255#255#255#0#255#255#255#0'e'#175'z'#246#169#221
+  +#179#255'}'#207#138#255'u'#204#129#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'Y'#184'p'#255'g'
+  +#190'}'#255#156#212#171#255'4'#136'='#246#255#255#255#0#255#255#255#0'i'#178
+  +'~'#246#182#226#190#255#139#213#151#255'z'#201#134#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  ,'Y'#184'p'#255'i'#193'~'#255#157#212#170#255'8'#139'B'#246#255#255#255#0#255
+  +#255#255#0'm'#181#131#219#172#221#182#255#166#223#175#255#129#203#140#255'|'
+  +#201#134#255'n'#189'y'#255#255#255#255#255#255#255#255#255'['#172'j'#255'`'
+  +#188'w'#255'\'#186's'#255#139#209#153#255#128#197#146#255'<'#142'G'#219#255
+  +#255#255#0#255#255#255#0'p'#184#135'~'#133#199#151#255#210#238#215#255#149
+  +#217#160#255#138#211#148#255#127#200#137#255#255#255#255#255#255#255#255#255
+  +'y'#205#133#255'k'#195'|'#255'o'#199'~'#255#172#223#181#255'E'#158'W'#255'@'
+  +#145'L~'#255#255#255#0#255#255#255#0's'#186#138'"p'#184#135#229#170#218#183
+  +#255#216#241#220#255#146#216#157#255#136#205#147#255#132#204#142#255#139#212
+  +#150#255#138#212#149#255#131#210#142#255#175#224#183#255'k'#185'}'#255'H'#152
+  +'V'#229'D'#148'Q"'#255#255#255#0#255#255#255#0#255#255#255#0's'#187#139'Sp'
+  +#184#135#244#175#220#187#255#220#242#224#255#182#228#189#255#155#219#165#255
+  +#150#217#160#255#165#223#175#255#192#232#197#255'y'#194#138#255'P'#158'_'#244
+  +'L'#155'[S'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0's'#187#139'Sq'#184#135#230#148#206#164#255#195#230#203#255#207#235#212
+  +#255#201#233#206#255#175#221#184#255'm'#185#127#255'X'#165'i'#230'T'#161'eS'
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0't'#187#139'#q'#185#136'}n'#182#132#219'j'#179#128
+  +#243'g'#177'|'#243'c'#174'w'#219'`'#171's}\'#168'n#'#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#9'NumGlyphs'#2#0#7'OnClick'#7#12'Button1C'
+  +'LICK'#8'TabOrder'#2#4#0#0#7'TBitBtn'#9'BtnRemove'#4'Left'#3#128#0#6'Height'
+  +#2#31#3'Top'#3#11#1#5'Width'#2'K'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#6
+  +'akLeft'#8'akBottom'#0#7'Caption'#6#6'Remove'#10'Glyph.Data'#10':'#4#0#0'6'#4
+  +#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0
+  +#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#255
   +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
   +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#9'NumGlyphs'#2#0#7'OnClick'#7#12'Button1CLICK'#8'TabOrder'#2#4#0#0#7'TBitBt'
-  +'n'#9'BtnRemove'#4'Left'#3#128#0#6'Height'#2#31#3'Top'#3#11#1#5'Width'#2'K'#8
-  +'HelpType'#7#9'htKeyword'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6
-  +#6'Remove'#10'Glyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('
-  +#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0
-  +#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
   +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0'?T'#195'#:P'#194'}8S'#190#219'5Q'#189#243'0K'#188
+  +#243'.N'#184#219'+L'#183'}''H'#181'#'#255#255#255#0#255#255#255#0#255#255#255
+  +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'FX'#200'SBU'#198
+  +#230'<R'#204#255'uz'#232#255#143#146#238#255#143#146#238#255'qx'#228#255'3M'
+  +#193#255'+J'#183#230')K'#181'S'#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0'MZ'#205'SIY'#203#244'\e'#224#255#161#166#245#255'~'
+  +#134#239#255'[c'#233#255'Y]'#231#255'}'#132#238#255#158#160#244#255'Q]'#215
+  +#255'+J'#183#244')K'#181'S'#255#255#255#0#255#255#255#0#255#255#255#0'T_'#210
+  +'"Sa'#207#229'ak'#227#255#161#172#245#255'T_'#236#255'P\'#234#255'MY'#233#255
+  +'NY'#230#255'LV'#230#255'PV'#230#255#158#162#244#255'T`'#214#255'*J'#184#229
+  +')K'#181'"'#255#255#255#0#255#255#255#0'X`'#212'~KV'#219#255#162#171#246#255
+  +'Vd'#240#255'Rf'#238#255'MY'#233#255'MY'#233#255'MY'#233#255'MY'#233#255'LX'
+  +#230#255'RZ'#230#255#159#163#245#255'4P'#196#255'*J'#184'~'#255#255#255#0#255
+  +#255#255#0'\b'#215#219#129#140#238#255'~'#145#247#255']s'#243#255'MY'#233#255
+  +'MY'#233#255'MY'#233#255'MY'#233#255'MY'#233#255'MY'#233#255'O['#233#255'{'
+  +#131#240#255'u{'#226#255'.K'#186#219#255#255#255#0#255#255#255#0'_c'#218#246
+  +#161#171#247#255'p'#134#248#255'h'#130#246#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'MY'#233
+  +#255'\f'#234#255#150#156#241#255'2P'#188#246#255#255#255#0#255#255#255#0'di'
+  +#219#246#175#185#249#255#127#147#250#255'p'#133#240#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'MY'#233#255'^j'#238#255#150#157#241#255'6O'#190#246#255#255#255#0#255#255
+  +#255#0'gj'#222#219#165#175#245#255#157#171#250#255'w'#140#240#255'T_'#236#255
+  +'T_'#236#255'T_'#236#255'T_'#236#255'T_'#236#255'T_'#236#255'cw'#242#255#129
+  +#142#244#255'x'#127#233#255':S'#192#219#255#255#255#0#255#255#255#0'ji'#224
+  +'~}'#131#234#255#205#212#252#255#139#157#250#255'~'#147#247#255'u'#138#238
+  +#255'l'#132#246#255'l'#132#246#255'l'#132#246#255'l'#132#246#255'cy'#243#255
+  +#164#175#248#255'>O'#208#255'>T'#194'~'#255#255#255#0#255#255#255#0'll'#225
+  +'"ji'#224#229#163#167#243#255#212#219#253#255#135#154#250#255#127#145#240#255
+  +'z'#142#241#255#127#148#248#255'~'#146#249#255'v'#140#248#255#168#182#248#255
+  +'cn'#227#255'EW'#199#229'AV'#197'"'#255#255#255#0#255#255#255#0#255#255#255#0
+  +'ml'#227'Sji'#224#244#170#173#242#255#216#220#253#255#174#186#250#255#145#163
+  +#250#255#139#157#250#255#156#169#251#255#186#199#252#255'p{'#233#255'L['#204
+  ,#244'HX'#202'S'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0'ml'#227'Sjj'#223#230#142#147#237#255#190#195#248#255#204#211#249
+  +#255#196#203#249#255#170#180#244#255'fp'#226#255'S^'#209#230'P]'#206'S'#255
   +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'?T'#195'#:P'
+  +#255#0#255#255#255#0'mm'#226'#kj'#225'}hj'#221#219'cd'#220#243'ad'#218#243']'
-  +#194'}8S'#190#219'5Q'#189#243'0K'#188#243'.N'#184#219'+L'#183'}''H'#181'#'
+  +'c'#217#219'[c'#214'}Xb'#212'#'#255#255#255#0#255#255#255#0#255#255#255#0#255
-  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
-  +#255#255#0#255#255#255#0'FX'#200'SBU'#198#230'<R'#204#255'uz'#232#255#143#146
-  +#238#255#143#146#238#255'qx'#228#255'3M'#193#255'+J'#183#230')K'#181'S'#255
-  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'MZ'#205'S'
-  +'IY'#203#244'\e'#224#255#161#166#245#255'~'#134#239#255'[c'#233#255'Y]'#231
-  +#255'}'#132#238#255#158#160#244#255'Q]'#215#255'+J'#183#244')K'#181'S'#255
-  +#255#255#0#255#255#255#0#255#255#255#0'T_'#210'"Sa'#207#229'ak'#227#255#161
-  +#172#245#255'T_'#236#255'P\'#234#255'MY'#233#255'NY'#230#255'LV'#230#255'PV'
-  +#230#255#158#162#244#255'T`'#214#255'*J'#184#229')K'#181'"'#255#255#255#0#255
-  +#255#255#0'X`'#212'~KV'#219#255#162#171#246#255'Vd'#240#255'Rf'#238#255'MY'
-  +#233#255'MY'#233#255'MY'#233#255'MY'#233#255'LX'#230#255'RZ'#230#255#159#163
-  +#245#255'4P'#196#255'*J'#184'~'#255#255#255#0#255#255#255#0'\b'#215#219#129
-  +#140#238#255'~'#145#247#255']s'#243#255'MY'#233#255'MY'#233#255'MY'#233#255
-  +'MY'#233#255'MY'#233#255'MY'#233#255'O['#233#255'{'#131#240#255'u{'#226#255
-  +'.K'#186#219#255#255#255#0#255#255#255#0'_c'#218#246#161#171#247#255'p'#134
-  +#248#255'h'#130#246#255#255#255#255#255#255#255#255#255#255#255#255#255#255
-  +#255#255#255#255#255#255#255#255#255#255#255'MY'#233#255'\f'#234#255#150#156
-  +#241#255'2P'#188#246#255#255#255#0#255#255#255#0'di'#219#246#175#185#249#255
-  +''#147#250#255'p'#133#240#255#255#255#255#255#255#255#255#255#255#255#255
-  +#255#255#255#255#255#255#255#255#255#255#255#255#255'MY'#233#255'^j'#238#255
-  +#150#157#241#255'6O'#190#246#255#255#255#0#255#255#255#0'gj'#222#219#165#175
-  +#245#255#157#171#250#255'w'#140#240#255'T_'#236#255'T_'#236#255'T_'#236#255
-  +'T_'#236#255'T_'#236#255'T_'#236#255'cw'#242#255#129#142#244#255'x'#233#255
-  +':S'#192#219#255#255#255#0#255#255#255#0'ji'#224'~}'#131#234#255#205#212#252
-  +#255#139#157#250#255'~'#147#247#255'u'#138#238#255'l'#132#246#255'l'#132#246
-  +#255'l'#132#246#255'l'#132#246#255'cy'#243#255#164#175#248#255'>O'#208#255'>'
-  +'T'#194'~'#255#255#255#0#255#255#255#0'll'#225'"ji'#224#229#163#167#243#255
-  +#212#219#253#255#135#154#250#255''#145#240#255'z'#142#241#255''#148#248#255
-  +'~'#146#249#255'v'#140#248#255#168#182#248#255'cn'#227#255'EW'#199#229'AV'
-  +#197'"'#255#255#255#0#255#255#255#0#255#255#255#0'ml'#227'Sji'#224#244#170
-  +#173#242#255#216#220#253#255#174#186#250#255#145#163#250#255#139#157#250#255
-  +#156#169#251#255#186#199#252#255'p{'#233#255'L['#204#244'HX'#202'S'#255#255
-  ,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'ml'#227'Sjj'
-  +#223#230#142#147#237#255#190#195#248#255#204#211#249#255#196#203#249#255#170
-  +#180#244#255'fp'#226#255'S^'#209#230'P]'#206'S'#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'mm'
-  +#226'#kj'#225'}hj'#221#219'cd'#220#243'ad'#218#243']c'#217#219'[c'#214'}Xb'
-  +#212'#'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
   +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
-  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#9'NumGlyphs'#2
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
-  +#0#7'OnClick'#7#14'BtnRemoveCLICK'#8'TabOrder'#2#5#0#0#11'TOpenDialog'#7'Dlg'
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
-  +'Load'#6'Filter'#6#10'*.pp|*.pas'#11'FilterIndex'#2#0#4'left'#3#208#0#3'top'
+  +#255#255#0#9'NumGlyphs'#2#0#7'OnClick'#7#14'BtnRemoveCLICK'#8'TabOrder'#2#5#0
-  +#3#16#1#0#0#0
+  +#0#11'TOpenDialog'#7'DlgLoad'#6'Filter'#6#10'*.pp|*.pas'#11'FilterIndex'#2#0
+  +#4'left'#3#208#0#3'top'#3#16#1#0#0#0
 ]);

packager/ucomponentmanmain.pas

@@ -36,7 +36,7 @@ Type
   public
     Name: String;
     Page: String;
-    Aunitname: String;
+    unit_name: String;
   end;
 
 type
@@ -179,7 +179,7 @@ begin
             MyObj := TRComponent.Create;
             MyObj.Name := FrmAddComponent.ListCompAdd.Items[i];
             MyObj.Page := 'Custom';
-            MyObj.Aunitname := FindUnitName;
+            MyObj.unit_name := FindUnitName;
             ListComps.Items.AddObject(MyObj.Name, MyObj);
           end; // if not found
         end; // if listcompadd selected
@@ -277,7 +277,7 @@ begin
   if assigned(MyObj) then begin
     LblComponent.Caption := Myobj.Name;
     TxtPage.Text := MyObj.Page;
-    LblUnit.Caption := MyObj.Aunitname;
+    LblUnit.Caption := MyObj.unit_name;
   end;
 
 end;
@@ -316,7 +316,7 @@ begin
     MyObj := TRComponent.Create;
     MyObj.Name := CompName;
     MyObj.Page := CompPage;
-    MyObj.AUnitName := CompUnit;
+    MyObj.Unit_Name := CompUnit;
     ListComps.Items.AddObject(CompName, MyObj);
   end;
   
@@ -378,11 +378,11 @@ begin
               MyObj2 := ListComps.Items.Objects[J] as TRComponent;
               //messagedlg('Comparing object '+MyObj.Name+' at '+inttostr(I)+' with '+MyObj2.Name, mtInformation,[mbOk],0);
               if assigned(MyOBj2) then begin
-                Found := AnsiCompareText(MyObj2.AUnitName,Myobj.AUnitName)=0;
+                Found := AnsiCompareText(MyObj2.Unit_Name,Myobj.Unit_Name)=0;
               end; // if assigned
             end; // for J
           end; // For I
-          if not(Found) then add('  '+MyObj.AUnitName+',');
+          if not(Found) then add('  '+MyObj.Unit_Name+',');
         end;
       end; // for I
       // remove last comma
@@ -415,7 +415,7 @@ begin
     for I := 0 to ListComps.Items.Count - 1 do begin
       MyObj := ListComps.Items.Objects[I] as TRComponent;
       if assigned(MyObj) then begin
-        MyFile.Add('  RegisterComponent('''+MyObj.Page+''','''+MyObj.Aunitname+''','+MyObj.Name+');');
+        MyFile.Add('  RegisterComponent('''+MyObj.Page+''','''+MyObj.unit_name+''','+MyObj.Name+');');
       end;
     end;
   end;