packager: change AUnitName property to Unit_Name

git-svn-id: trunk@22353 -
2025-04-08 08:38:19 +02:00 · 2009-10-30 15:02:59 +00:00 · 2009-10-30 15:02:59 +00:00 · 1e5ed0e46d
commit 1e5ed0e46d
parent 5d50a609c0
16 changed files with 986 additions and 1010 deletions
--- a/packager/addfiletoapackagedlg.lfm
+++ b/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
-      Top = 51
+      Height = 21
+      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
--- a/packager/addfiletoapackagedlg.lrs
+++ b/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'
-  +'oupBox'#12'FileGroupBox'#4'Left'#2#6#6'Height'#3#152#0#3'Top'#2#6#5'Width'#3
+  +'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#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'
-  +'d'#2#6#10'ItemHeight'#2#13#9'ItemWidth'#2#0#8'TabOrder'#2#0#4'Text'#6#16'Pa'
-  +'ckagesComboBox'#0#0#9'TCheckBox'#15'ShowAllCheckBox'#4'Left'#2#6#6'Height'#2
-  +#17#3'Top'#2'!'#5'Width'#3#185#1#5'Align'#7#5'alTop'#20'BorderSpacing.Around'
-  +#2#6#7'Caption'#6#15'ShowAllCheckBox'#7'OnClick'#7#20'ShowAllCheckBoxClick'#8
-  +'TabOrder'#2#1#0#0#0#12'TButtonPanel'#8'BtnPanel'#4'Left'#2#6#6'Height'#2#26
-  +#3'Top'#3#136#1#5'Width'#3#201#1#8'TabOrder'#2#2#11'ShowButtons'#11#4'pbOK'#8
-  +'pbCancel'#6'pbHelp'#0#9'ShowBevel'#8#0#0#0
+  +'idth'#3#185#1#5'Align'#7#5'alTop'#20'BorderSpacing.Around'#2#6#10'ItemHeigh'
+  +'t'#2#13#8'TabOrder'#2#0#4'Text'#6#16'PackagesComboBox'#0#0#9'TCheckBox'#15
+  +'ShowAllCheckBox'#4'Left'#2#6#6'Height'#2#17#3'Top'#2'!'#5'Width'#3#185#1#5
+  +'Align'#7#5'alTop'#20'BorderSpacing.Around'#2#6#7'Caption'#6#15'ShowAllCheck'
+  +'Box'#7'OnClick'#7#20'ShowAllCheckBoxClick'#8'TabOrder'#2#1#0#0#0#12'TButton'
+  +'Panel'#8'BtnPanel'#4'Left'#2#6#6'Height'#2#26#3'Top'#3#136#1#5'Width'#3#201
+  +#1#8'TabOrder'#2#2#11'ShowButtons'#11#4'pbOK'#8'pbCancel'#6'pbHelp'#0#9'Show'
+  +'Bevel'#8#0#0#0
 ]);
--- a/packager/addfiletoapackagedlg.pas
+++ b/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;

--- a/packager/addtopackagedlg.lfm
+++ b/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
-      ClientHeight = 273
+      ClientWidth = 492
+      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
-        ClientWidth = 245
+        ClientHeight = 201
+        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
-        Width = 498
+        Top = 224
+        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
-      ClientHeight = 273
+      ClientWidth = 492
+      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
-      ClientHeight = 273
+      ClientWidth = 492
+      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 = 0
-        ItemWidth = 0
+        ItemHeight = 13
        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
-        ItemWidth = 0
+        ItemHeight = 13
        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
-      ClientHeight = 273
+      ClientWidth = 492
+      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 = 0
-        ItemWidth = 0
+        ItemHeight = 13
        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
-      ClientHeight = 273
+      ClientWidth = 492
+      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
-      ClientHeight = 273
+      ClientWidth = 492
+      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
-        Width = 498
+        Top = 233
+        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
--- a/packager/addtopackagedlg.lrs
+++ b/packager/addtopackagedlg.lrs
--- a/packager/addtopackagedlg.pas
+++ b/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:='';
--- a/packager/packagedefs.pas
+++ b/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(PkgFile2).AUnitName);
+              TPkgFile(PkgFile1).Unit_Name,
+              TPkgFile(PkgFile2).Unit_Name);
 end;

 constructor TPkgUnitsTree.Create(ThePackage: TLazPackage);
--- a/packager/packageeditor.pas
+++ b/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;
--- a/packager/packagesystem.pas
+++ b/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
-            CurFile.AUnitName:=CurSrcUnitName;
+          if SysUtils.CompareText(CurSrcUnitName,CurFile.Unit_Name)=0 then
+            CurFile.Unit_Name:=CurSrcUnitName;
        end;
-        if SysUtils.CompareText(CurUnitName,CurFile.AUnitName)=0 then
-          CurUnitName:=CurFile.AUnitName
+        if SysUtils.CompareText(CurUnitName,CurFile.Unit_Name)=0 then
+          CurUnitName:=CurFile.Unit_Name
        else
-          CurFile.AUnitName:=CurUnitName;
+          CurFile.Unit_Name:=CurUnitName;
      end;

      if (CurUnitName<>'') and IsValidIdent(CurUnitName) then begin
--- a/packager/pkgmanager.pas
+++ b/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,
--- a/packager/pkgvirtualuniteditor.lfm
+++ b/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
--- a/packager/pkgvirtualuniteditor.lrs
+++ b/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'
-  +'enter'#10'LCLVersion'#6#6'0.9.25'#0#6'TLabel'#13'FilenameLabel'#4'Left'#2#8
-  +#6'Height'#2#14#3'Top'#2#24#5'Width'#2'D'#7'Caption'#6#13'FilenameLabel'#11
-  +'ParentColor'#8#0#0#6'TLabel'#13'UnitnameLabel'#4'Left'#2#8#6'Height'#2#14#3
-  +'Top'#2'@'#5'Width'#2'G'#7'Caption'#6#13'UnitnameLabel'#11'ParentColor'#8#0#0
-  +#5'TEdit'#12'FilenameEdit'#4'Left'#2'`'#6'Height'#2#23#3'Top'#2#18#5'Width'#3
-  +'X'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#0#4'Text'#6
-  +#12'FilenameEdit'#0#0#5'TEdit'#12'UnitnameEdit'#4'Left'#2'`'#6'Height'#2#23#3
-  +'Top'#2':'#5'Width'#3#128#0#8'TabOrder'#2#1#4'Text'#6#12'UnitnameEdit'#0#0#7
-  +'TBitBtn'#12'CancelButton'#4'Left'#3'L'#1#6'Height'#2#25#3'Top'#2'`'#5'Width'
-  +#2'e'#7'Caption'#6#12'CancelButton'#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#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
+  +#27'EditVirtualUnitDialogCreate'#8'Position'#7#14'poScreenCenter'#10'LCLVers'
+  +'ion'#6#6'0.9.29'#0#6'TLabel'#13'FilenameLabel'#4'Left'#2#8#6'Height'#2#14#3
+  +'Top'#2#24#5'Width'#2'D'#7'Caption'#6#13'FilenameLabel'#11'ParentColor'#8#0#0
+  +#6'TLabel'#13'UnitnameLabel'#4'Left'#2#8#6'Height'#2#14#3'Top'#2'@'#5'Width'
+  +#2'G'#7'Caption'#6#13'UnitnameLabel'#11'ParentColor'#8#0#0#5'TEdit'#12'Filen'
+  +'ameEdit'#4'Left'#2'`'#6'Height'#2#21#3'Top'#2#18#5'Width'#3'X'#1#7'Anchors'
+  +#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#0#4'Text'#6#12'FilenameEdi'
+  +'t'#0#0#5'TEdit'#12'UnitnameEdit'#4'Left'#2'`'#6'Height'#2#21#3'Top'#2':'#5
+  +'Width'#3#128#0#8'TabOrder'#2#1#4'Text'#6#12'UnitnameEdit'#0#0#7'TBitBtn'#12
+  +'CancelButton'#4'Left'#3'L'#1#6'Height'#2#25#3'Top'#2'`'#5'Width'#2'e'#7'Cap'
+  +'tion'#6#12'CancelButton'#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#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'1z6'#10'-u2'#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#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'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
-  +'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#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'K'#159'T'#145'`'#176'j'#255#129#207
-  +#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#255#0'1z6'#10'-u2'#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#255#255#255#0#255#255#255#0#255#255#255#0'N'#162
-  +'W'#145'J'#157'R'#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#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'
-  +#7#13'OkButtonClick'#8'TabOrder'#2#3#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#9'NumGlyphs'#2#0#7'OnClick'#7#13'OkButtonClick'
+  +#8'TabOrder'#2#3#0#0#0
 ]);
--- a/packager/pkgvirtualuniteditor.pas
+++ b/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;

--- a/packager/ucomponentmanmain.lfm
+++ b/packager/ucomponentmanmain.lfm
@ -12,8 +12,7 @@ object FrmComponentMan: TFrmComponentMan
  OnCreate = FrmMainCREATE
  OnDestroy = FrmMainDESTROY
  OnShow = FrmMainSHOW
-  ParentFont = False
-  LCLVersion = '0.9.25'
+  LCLVersion = '0.9.29'
  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
--- a/packager/ucomponentmanmain.lrs
+++ b/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
-  +'Left'#2#12#6'Height'#2#14#3'Top'#2#8#5'Width'#2'm'#8'HelpType'#7#9'htKeywor'
-  +'d'#7'Caption'#6#21'Installed Components:'#11'ParentColor'#8#0#0#6'TLabel'#6
-  +'Label2'#4'Left'#3#143#1#6'Height'#2#14#3'Top'#2#20#5'Width'#2'Z'#8'HelpType'
-  +#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#15'Componen'
-  +'t Name:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label3'#4'Left'#3'2'#1#6'Height'
-  +#2#14#3'Top'#3#165#0#5'Width'#2'9'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5
-  +'akTop'#7'akRight'#0#7'Caption'#6#12'Pascal Unit:'#11'ParentColor'#8#0#0#6'T'
-  +'Label'#6'Label4'#4'Left'#3'>'#1#6'Height'#2#14#3'Top'#2'`'#5'Width'#2#29#8
-  +'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#5
-  +'Page:'#11'ParentColor'#8#0#0#6'TLabel'#12'LblComponent'#4'Left'#3#171#1#6'H'
-  +'eight'#2#14#3'Top'#2'8'#5'Width'#2'E'#8'HelpType'#7#9'htKeyword'#7'Anchors'
-  +#11#5'akTop'#7'akRight'#0#7'Caption'#6#12'LblComponent'#11'ParentColor'#8#0#0
-  +#6'TLabel'#7'LblUnit'#4'Left'#3#176#1#6'Height'#2#14#3'Top'#3#208#0#5'Width'
-  +#2'!'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Capti'
-  +'on'#6#7'LblUnit'#11'ParentColor'#8#0#0#8'TListBox'#9'ListComps'#4'Left'#2#12
-  +#6'Height'#3#215#0#3'Top'#2'('#5'Width'#3#240#0#8'HelpType'#7#9'htKeyword'#7
-  +'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'OnClick'#7#14'Lis'
-  +'tCompsCLICK'#6'Sorted'#9#8'TabOrder'#2#0#0#0#7'TBitBtn'#9'BtnCancel'#4'Left'
-  +#3#136#1#6'Height'#2#31#3'Top'#3#11#1#5'Width'#2'a'#8'HelpType'#7#9'htKeywor'
-  +'d'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#6'Cancel'#4'Kind'#7#8
-  +'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#7'OnClick'#7#14'BtnCancelCLI'
-  +'CK'#8'TabOrder'#2#1#0#0#7'TBitBtn'#7'Bitbtn2'#4'Left'#3'%'#1#6'Height'#2#31
-  +#3'Top'#3#11#1#5'Width'#2'Q'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#7'akRi'
-  +'ght'#8'akBottom'#0#7'Caption'#6#4'Save'#7'Default'#9#4'Kind'#7#4'bkOK'#11'M'
-  +'odalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#12'Bitbtn2CLICK'#8'TabOrder'#2
-  +#2#0#0#5'TEdit'#7'TxtPage'#4'Left'#3#8#1#6'Height'#2#23#3'Top'#3#128#0#5'Wid'
-  +'th'#3#232#0#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#8
-  +'OnChange'#7#13'TxtPageCHANGE'#8'TabOrder'#2#3#0#0#7'TBitBtn'#7'Button1'#4'L'
-  +'eft'#2#24#6'Height'#2#31#3'Top'#3#11#1#5'Width'#2'K'#8'HelpType'#7#9'htKeyw'
-  +'ord'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6#7'Add New'#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
+  +'nSHOW'#10'LCLVersion'#6#6'0.9.29'#0#6'TLabel'#6'Label1'#4'Left'#2#12#6'Heig'
+  +'ht'#2#14#3'Top'#2#8#5'Width'#2'm'#8'HelpType'#7#9'htKeyword'#7'Caption'#6#21
+  +'Installed Components:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label2'#4'Left'#3
+  +#143#1#6'Height'#2#14#3'Top'#2#20#5'Width'#2'Z'#8'HelpType'#7#9'htKeyword'#7
+  +'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#15'Component Name:'#11'Paren'
+  +'tColor'#8#0#0#6'TLabel'#6'Label3'#4'Left'#3'2'#1#6'Height'#2#14#3'Top'#3#165
+  +#0#5'Width'#2'9'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'
+  +#0#7'Caption'#6#12'Pascal Unit:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label4'#4
+  +'Left'#3'>'#1#6'Height'#2#14#3'Top'#2'`'#5'Width'#2#29#8'HelpType'#7#9'htKey'
+  +'word'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#5'Page:'#11'ParentCo'
+  +'lor'#8#0#0#6'TLabel'#12'LblComponent'#4'Left'#3#171#1#6'Height'#2#14#3'Top'
+  +#2'8'#5'Width'#2'E'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRi'
+  +'ght'#0#7'Caption'#6#12'LblComponent'#11'ParentColor'#8#0#0#6'TLabel'#7'LblU'
+  +'nit'#4'Left'#3#176#1#6'Height'#2#14#3'Top'#3#208#0#5'Width'#2'!'#8'HelpType'
+  +#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#7'LblUnit'
+  +#11'ParentColor'#8#0#0#8'TListBox'#9'ListComps'#4'Left'#2#12#6'Height'#3#215
+  +#0#3'Top'#2'('#5'Width'#3#240#0#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'a'
+  +'kTop'#6'akLeft'#7'akRight'#8'akBottom'#0#10'ItemHeight'#2#0#7'OnClick'#7#14
+  +'ListCompsCLICK'#6'Sorted'#9#8'TabOrder'#2#0#0#0#7'TBitBtn'#9'BtnCancel'#4'L'
+  +'eft'#3#136#1#6'Height'#2#31#3'Top'#3#11#1#5'Width'#2'a'#8'HelpType'#7#9'htK'
+  +'eyword'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#6'Cancel'#4'Kin'
+  +'d'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#7'OnClick'#7#14'BtnCa'
+  +'ncelCLICK'#8'TabOrder'#2#1#0#0#7'TBitBtn'#7'Bitbtn2'#4'Left'#3'%'#1#6'Heigh'
+  +'t'#2#31#3'Top'#3#11#1#5'Width'#2'Q'#8'HelpType'#7#9'htKeyword'#7'Anchors'#11
+  +#7'akRight'#8'akBottom'#0#7'Caption'#6#4'Save'#7'Default'#9#4'Kind'#7#4'bkOK'
+  +#11'ModalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#12'Bitbtn2CLICK'#8'TabOrd'
+  +'er'#2#2#0#0#5'TEdit'#7'TxtPage'#4'Left'#3#8#1#6'Height'#2#21#3'Top'#3#128#0
+  +#5'Width'#3#232#0#8'HelpType'#7#9'htKeyword'#7'Anchors'#11#5'akTop'#7'akRigh'
+  +'t'#0#8'OnChange'#7#13'TxtPageCHANGE'#8'TabOrder'#2#3#0#0#7'TBitBtn'#7'Butto'
+  +'n1'#4'Left'#2#24#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#7'Add New'#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#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'
-  +#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'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#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#9'NumGlyphs'#2
-  +#0#7'OnClick'#7#14'BtnRemoveCLICK'#8'TabOrder'#2#5#0#0#11'TOpenDialog'#7'Dlg'
-  +'Load'#6'Filter'#6#10'*.pp|*.pas'#11'FilterIndex'#2#0#4'left'#3#208#0#3'top'
-  +#3#16#1#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#9'NumGlyphs'#2#0#7'OnClick'#7#14'BtnRemoveCLICK'#8'TabOrder'#2#5#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
 ]);
--- a/packager/ucomponentmanmain.pas
+++ b/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;