IDE: add files to package page: changed buttons to TBitBtn

git-svn-id: trunk@16143 -

packager/addtopackagedlg.lfm

@@ -698,7 +698,7 @@ object AddToPackageDlg: TAddToPackageDlg
         TabOrder = 1
         object FilesBrowseButton: TButton
           AnchorSideBottom.Side = asrBottom
-          Left = 6
+          Left = 281
           Height = 29
           Top = 6
           Width = 128
@@ -709,35 +709,9 @@ object AddToPackageDlg: TAddToPackageDlg
           OnClick = FilesBrowseButtonClick
           TabOrder = 0
         end
-        object FilesShortenButton: TButton
-          AnchorSideLeft.Side = asrBottom
-          Left = 140
-          Height = 29
-          Top = 6
-          Width = 133
-          Align = alLeft
-          AutoSize = True
-          BorderSpacing.Around = 6
-          Caption = 'FilesShortenButton'
-          OnClick = FilesShortenButtonClick
-          TabOrder = 1
-        end
-        object FilesDeleteButton: TButton
-          AnchorSideLeft.Side = asrBottom
-          Left = 279
-          Height = 29
-          Top = 6
-          Width = 124
-          Align = alLeft
-          AutoSize = True
-          BorderSpacing.Around = 6
-          Caption = 'FilesDeleteButton'
-          OnClick = FilesDeleteButtonClick
-          TabOrder = 2
-        end
         object FilesAddButton: TButton
           AnchorSideLeft.Side = asrBottom
-          Left = 409
+          Left = 415
           Height = 29
           Top = 6
           Width = 107
@@ -746,6 +720,32 @@ object AddToPackageDlg: TAddToPackageDlg
           BorderSpacing.Around = 6
           Caption = 'FilesAddButton'
           OnClick = FilesAddButtonClick
+          TabOrder = 1
+        end
+        object FilesShortenButton: TBitBtn
+          AnchorSideLeft.Side = asrBottom
+          Left = 139
+          Height = 29
+          Top = 6
+          Width = 136
+          Align = alLeft
+          AutoSize = True
+          BorderSpacing.Around = 6
+          Caption = 'FilesShortenButton'
+          NumGlyphs = 0
+          TabOrder = 2
+        end
+        object FilesDeleteButton: TBitBtn
+          AnchorSideLeft.Side = asrBottom
+          Left = 6
+          Height = 29
+          Top = 6
+          Width = 127
+          Align = alLeft
+          AutoSize = True
+          BorderSpacing.Around = 6
+          Caption = 'FilesDeleteButton'
+          NumGlyphs = 0
           TabOrder = 3
         end
       end

packager/addtopackagedlg.lrs

@@ -237,19 +237,18 @@ LazarusResources.Add('TAddToPackageDlg','FORMDATA',[
   +#3'Top'#3#232#0#5'Width'#3#242#1#5'Align'#7#8'alBottom'#8'AutoSize'#9#10'Bev'
   +'elOuter'#7#6'bvNone'#12'ClientHeight'#2')'#11'ClientWidth'#3#242#1#8'TabOrd'
   +'er'#2#1#0#7'TButton'#17'FilesBrowseButton'#21'AnchorSideBottom.Side'#7#9'as'
-  +'rBottom'#4'Left'#2#6#6'Height'#2#29#3'Top'#2#6#5'Width'#3#128#0#5'Align'#7#6
+  +'rBottom'#4'Left'#3#25#1#6'Height'#2#29#3'Top'#2#6#5'Width'#3#128#0#5'Align'
-  +'alLeft'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'FilesBro'
+  +#7#6'alLeft'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'File'
-  +'wseButton'#7'OnClick'#7#22'FilesBrowseButtonClick'#8'TabOrder'#2#0#0#0#7'TB'
+  +'sBrowseButton'#7'OnClick'#7#22'FilesBrowseButtonClick'#8'TabOrder'#2#0#0#0#7
-  +'utton'#18'FilesShortenButton'#19'AnchorSideLeft.Side'#7#9'asrBottom'#4'Left'
+  +'TButton'#14'FilesAddButton'#19'AnchorSideLeft.Side'#7#9'asrBottom'#4'Left'#3
-  +#3#140#0#6'Height'#2#29#3'Top'#2#6#5'Width'#3#133#0#5'Align'#7#6'alLeft'#8'A'
+  +#159#1#6'Height'#2#29#3'Top'#2#6#5'Width'#2'k'#5'Align'#7#6'alLeft'#8'AutoSi'
-  +'utoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#18'FilesShortenButton'
+  +'ze'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#14'FilesAddButton'#7'OnClic'
-  +#7'OnClick'#7#23'FilesShortenButtonClick'#8'TabOrder'#2#1#0#0#7'TButton'#17
+  +'k'#7#19'FilesAddButtonClick'#8'TabOrder'#2#1#0#0#7'TBitBtn'#18'FilesShorten'
-  +'FilesDeleteButton'#19'AnchorSideLeft.Side'#7#9'asrBottom'#4'Left'#3#23#1#6
+  +'Button'#19'AnchorSideLeft.Side'#7#9'asrBottom'#4'Left'#3#139#0#6'Height'#2
-  +'Height'#2#29#3'Top'#2#6#5'Width'#2'|'#5'Align'#7#6'alLeft'#8'AutoSize'#9#20
+  +#29#3'Top'#2#6#5'Width'#3#136#0#5'Align'#7#6'alLeft'#8'AutoSize'#9#20'Border'
-  +'BorderSpacing.Around'#2#6#7'Caption'#6#17'FilesDeleteButton'#7'OnClick'#7#22
+  +'Spacing.Around'#2#6#7'Caption'#6#18'FilesShortenButton'#9'NumGlyphs'#2#0#8
-  +'FilesDeleteButtonClick'#8'TabOrder'#2#2#0#0#7'TButton'#14'FilesAddButton'#19
+  +'TabOrder'#2#2#0#0#7'TBitBtn'#17'FilesDeleteButton'#19'AnchorSideLeft.Side'#7
-  +'AnchorSideLeft.Side'#7#9'asrBottom'#4'Left'#3#153#1#6'Height'#2#29#3'Top'#2
+  +#9'asrBottom'#4'Left'#2#6#6'Height'#2#29#3'Top'#2#6#5'Width'#2''#5'Align'#7
-  +#6#5'Width'#2'k'#5'Align'#7#6'alLeft'#8'AutoSize'#9#20'BorderSpacing.Around'
+  +#6'alLeft'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'FilesD'
-  +#2#6#7'Caption'#6#14'FilesAddButton'#7'OnClick'#7#19'FilesAddButtonClick'#8
+  +'eleteButton'#9'NumGlyphs'#2#0#8'TabOrder'#2#3#0#0#0#0#0#0
-  +'TabOrder'#2#3#0#0#0#0#0#0
 ]);

packager/addtopackagedlg.pas

@@ -80,6 +80,8 @@ type
   { TAddToPackageDlg }
 
   TAddToPackageDlg = class(TForm)
+    FilesDeleteButton: TBitBtn;
+    FilesShortenButton: TBitBtn;
     // notebook
     NoteBook: TNoteBook;
     NewFilePage: TPage;
@@ -143,8 +145,6 @@ type
     // add files page
     FilesListView: TListView;
     FilesBrowseButton: TButton;
-    FilesShortenButton: TButton;
-    FilesDeleteButton: TButton;
     FilesAddButton: TButton;
     NewFileBtnPanel: TPanel;
     AddFilesBtnPanel: TPanel;