paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-23 02:19:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

improved layout of graphic prop editor form

Browse Source 
git-svn-id: trunk@12606 -
This commit is contained in:
mattias 2007-10-27 12:53:55 +00:00
parent 2cf0df7f92
commit b86924d2c6
3 changed files with 126 additions and 125 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

152
ideintf/graphicpropedit.lfm
View File

@ -1,71 +1,43 @@
object GraphicPropertyEditorForm: TGraphicPropertyEditorForm object GraphicPropertyEditorForm: TGraphicPropertyEditorForm
Left = 290 Left = 290
Height = 330 Height = 381
Top = 153 Top = 153
Width = 370 Width = 436
HorzScrollBar.Page = 369 HorzScrollBar.Page = 435
VertScrollBar.Page = 329 VertScrollBar.Page = 380
ActiveControl = LoadButton ActiveControl = LoadButton
Caption = 'Load Image Dialog' Caption = 'Load Image Dialog'
ClientHeight = 381
ClientWidth = 436
Constraints.MinHeight = 180 Constraints.MinHeight = 180
Constraints.MinWidth = 200 Constraints.MinWidth = 200
OnCreate = FormCreate OnCreate = FormCreate
Position = poScreenCenter Position = poScreenCenter
object GroupBox1: TGroupBox object GroupBox1: TGroupBox
Left = 6 Left = 6
Height = 289 Height = 317
Top = 6 Top = 6
Width = 358 Width = 424
Align = alTop Align = alClient
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Picture' Caption = 'Picture'
ClientHeight = 298
ClientWidth = 420
TabOrder = 0 TabOrder = 0
object LoadButton: TButton
Left = 275
Height = 25
Width = 75
Anchors = [akTop, akRight]
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Caption = 'Load'
OnClick = LoadButtonClick
TabOrder = 0
end
object SaveButton: TButton
Left = 275
Height = 25
Top = 31
Width = 75
Anchors = [akTop, akRight]
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Caption = 'Save'
OnClick = SaveButtonClick
TabOrder = 1
end
object ClearButton: TButton
Left = 275
Height = 25
Top = 62
Width = 75
Anchors = [akTop, akRight]
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Caption = 'Clear'
OnClick = ClearButtonClick
TabOrder = 2
end
object ScrollBox: TScrollBox object ScrollBox: TScrollBox
Left = 5 AnchorSideRight.Control = GroupBox1
Height = 262 AnchorSideRight.Side = asrBottom
Top = 2 AnchorSideBottom.Control = GroupBox1
Width = 261 AnchorSideBottom.Side = asrBottom
Left = 6
Height = 286
Top = 6
Width = 349
AutoScroll = True AutoScroll = True
Anchors = [akTop, akLeft, akRight, akBottom] Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ParentColor = False ParentColor = False
TabOrder = 3 TabOrder = 0
object ImagePreview: TImage object ImagePreview: TImage
Height = 100 Height = 100
Width = 100 Width = 100
@ -73,48 +45,74 @@ object GraphicPropertyEditorForm: TGraphicPropertyEditorForm
Center = True Center = True
end end
end end
end object LoadSaveBtnPanel: TPanel
object OKButton: TBitBtn Left = 361
Left = 207 Height = 286
Height = 25 Top = 6
Top = 301 Width = 53
Width = 75 Align = alRight
Anchors = [akRight, akBottom] AutoSize = True
BorderSpacing.Bottom = 6
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = '&OK' BevelOuter = bvNone
Default = True ClientHeight = 286
Kind = bkOK ClientWidth = 53
ModalResult = 1 TabOrder = 1
NumGlyphs = 0 object LoadButton: TButton
Height = 25
Width = 53
Align = alTop
BorderSpacing.Bottom = 6
BorderSpacing.InnerBorder = 4
Caption = 'Load'
OnClick = LoadButtonClick
TabOrder = 0
end
object SaveButton: TButton
Height = 25
Top = 31
Width = 53
Align = alTop
BorderSpacing.Bottom = 6
BorderSpacing.InnerBorder = 4
Caption = 'Save'
OnClick = SaveButtonClick
TabOrder = 1 TabOrder = 1
end end
object CancelButton: TBitBtn object ClearButton: TButton
Left = 289
Height = 25 Height = 25
Top = 301 Top = 62
Width = 75 Width = 53
Anchors = [akRight, akBottom] Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Bottom = 6
Cancel = True BorderSpacing.InnerBorder = 4
Caption = 'Cancel' Caption = 'Clear'
Kind = bkCancel OnClick = ClearButtonClick
ModalResult = 2
NumGlyphs = 0
TabOrder = 2 TabOrder = 2
end end
end
end
object OkCancelButtonPanel: TButtonPanel
Left = 6
Height = 52
Top = 329
Width = 424
Align = alBottom
TabOrder = 1
ShowButtons = [pbOK, pbCancel]
ShowGlyphs = [pbOK, pbCancel, pbClose, pbHelp]
end
object OpenDialog: TOpenPictureDialog object OpenDialog: TOpenPictureDialog
Title = 'Open existing file' Title = 'Open existing file'
Filter = 'Graphic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm)|*.ppm|Portable GrayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portable Network Graphic (*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp|All files (*.*)|*.*|' Filter = 'Graphic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm)|*.ppm|Portable GrayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portable Network Graphic (*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp|All files (*.*)|*.*|'
FilterIndex = 0 FilterIndex = 0
left = 136 left = 152
top = 288 top = 160
end end
object SaveDialog: TSavePictureDialog object SaveDialog: TSavePictureDialog
Title = 'Save file as' Title = 'Save file as'
Filter = 'Graphic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm)|*.ppm|Portable GrayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portable Network Graphic (*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp|All files (*.*)|*.*|' Filter = 'Graphic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm)|*.ppm|Portable GrayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portable Network Graphic (*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp|All files (*.*)|*.*|'
FilterIndex = 0 FilterIndex = 0
left = 136 left = 192
top = 320 top = 160
end end
end end

85
ideintf/graphicpropedit.lrs
View File

@ -1,44 +1,47 @@
{ Das ist eine automatisch erzeugte Lazarus-Ressourcendatei }
LazarusResources.Add('TGraphicPropertyEditorForm','FORMDATA',[ LazarusResources.Add('TGraphicPropertyEditorForm','FORMDATA',[
'TPF0'#26'TGraphicPropertyEditorForm'#25'GraphicPropertyEditorForm'#4'Left'#3 'TPF0'#26'TGraphicPropertyEditorForm'#25'GraphicPropertyEditorForm'#4'Left'#3
+'"'#1#6'Height'#3'J'#1#3'Top'#3#153#0#5'Width'#3'r'#1#18'HorzScrollBar.Page' +'"'#1#6'Height'#3'}'#1#3'Top'#3#153#0#5'Width'#3#180#1#18'HorzScrollBar.Page'
+#3'q'#1#18'VertScrollBar.Page'#3'I'#1#13'ActiveControl'#7#10'LoadButton'#7'C' +#3#179#1#18'VertScrollBar.Page'#3'|'#1#13'ActiveControl'#7#10'LoadButton'#7
+'aption'#6#17'Load Image Dialog'#21'Constraints.MinHeight'#3#180#0#20'Constr' +'Caption'#6#17'Load Image Dialog'#12'ClientHeight'#3'}'#1#11'ClientWidth'#3
+'aints.MinWidth'#3#200#0#8'OnCreate'#7#10'FormCreate'#8'Position'#7#14'poScr' +#180#1#21'Constraints.MinHeight'#3#180#0#20'Constraints.MinWidth'#3#200#0#8
+'eenCenter'#0#9'TGroupBox'#9'GroupBox1'#4'Left'#2#6#6'Height'#3'!'#1#3'Top'#2 +'OnCreate'#7#10'FormCreate'#8'Position'#7#14'poScreenCenter'#0#9'TGroupBox'#9
+#6#5'Width'#3'f'#1#5'Align'#7#5'alTop'#7'Anchors'#11#5'akTop'#6'akLeft'#7'ak' +'GroupBox1'#4'Left'#2#6#6'Height'#3'='#1#3'Top'#2#6#5'Width'#3#168#1#5'Align'
+'Right'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#7'Picture'#8 +#7#8'alClient'#20'BorderSpacing.Around'#2#6#7'Caption'#6#7'Picture'#12'Clien'
+'TabOrder'#2#0#0#7'TButton'#10'LoadButton'#4'Left'#3#19#1#6'Height'#2#25#5'W' +'tHeight'#3'*'#1#11'ClientWidth'#3#164#1#8'TabOrder'#2#0#0#10'TScrollBox'#9
+'idth'#2'K'#7'Anchors'#11#5'akTop'#7'akRight'#0#20'BorderSpacing.Around'#2#6 +'ScrollBox'#23'AnchorSideRight.Control'#7#9'GroupBox1'#20'AnchorSideRight.Si'
+#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#4'Load'#7'OnClick'#7#15'Load' +'de'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#9'GroupBox1'#21'AnchorSid'
+'ButtonClick'#8'TabOrder'#2#0#0#0#7'TButton'#10'SaveButton'#4'Left'#3#19#1#6 +'eBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#30#1#3'Top'#2#6#5'Widt'
+'Height'#2#25#3'Top'#2#31#5'Width'#2'K'#7'Anchors'#11#5'akTop'#7'akRight'#0 +'h'#3']'#1#10'AutoScroll'#9#5'Align'#7#8'alClient'#20'BorderSpacing.Around'#2
+#20'BorderSpacing.Around'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6 +#6#11'ParentColor'#8#8'TabOrder'#2#0#0#6'TImage'#12'ImagePreview'#6'Height'#2
+#4'Save'#7'OnClick'#7#15'SaveButtonClick'#8'TabOrder'#2#1#0#0#7'TButton'#11 +'d'#5'Width'#2'd'#8'AutoSize'#9#6'Center'#9#0#0#0#6'TPanel'#16'LoadSaveBtnPa'
+'ClearButton'#4'Left'#3#19#1#6'Height'#2#25#3'Top'#2'>'#5'Width'#2'K'#7'Anch' +'nel'#4'Left'#3'i'#1#6'Height'#3#30#1#3'Top'#2#6#5'Width'#2'5'#5'Align'#7#7
+'ors'#11#5'akTop'#7'akRight'#0#20'BorderSpacing.Around'#2#6#25'BorderSpacing' +'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#10'BevelOuter'#7#6'bvNo'
+'.InnerBorder'#2#4#7'Caption'#6#5'Clear'#7'OnClick'#7#16'ClearButtonClick'#8 +'ne'#12'ClientHeight'#3#30#1#11'ClientWidth'#2'5'#8'TabOrder'#2#1#0#7'TButto'
+'TabOrder'#2#2#0#0#10'TScrollBox'#9'ScrollBox'#4'Left'#2#5#6'Height'#3#6#1#3 +'n'#10'LoadButton'#6'Height'#2#25#5'Width'#2'5'#5'Align'#7#5'alTop'#20'Borde'
+'Top'#2#2#5'Width'#3#5#1#10'AutoScroll'#9#7'Anchors'#11#5'akTop'#6'akLeft'#7 +'rSpacing.Bottom'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#4'Load'
+'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#11'ParentColor'#8#8'Tab' +#7'OnClick'#7#15'LoadButtonClick'#8'TabOrder'#2#0#0#0#7'TButton'#10'SaveButt'
+'Order'#2#3#0#6'TImage'#12'ImagePreview'#6'Height'#2'd'#5'Width'#2'd'#8'Auto' +'on'#6'Height'#2#25#3'Top'#2#31#5'Width'#2'5'#5'Align'#7#5'alTop'#20'BorderS'
+'Size'#9#6'Center'#9#0#0#0#0#7'TBitBtn'#8'OKButton'#4'Left'#3#207#0#6'Height' +'pacing.Bottom'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#4'Save'#7
+#2#25#3'Top'#3'-'#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#20 +'OnClick'#7#15'SaveButtonClick'#8'TabOrder'#2#1#0#0#7'TButton'#11'ClearButto'
+'BorderSpacing.Bottom'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#7 +'n'#6'Height'#2#25#3'Top'#2'>'#5'Width'#2'5'#5'Align'#7#5'alTop'#20'BorderSp'
+'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrde' +'acing.Bottom'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#5'Clear'#7
+'r'#2#1#0#0#7'TBitBtn'#12'CancelButton'#4'Left'#3'!'#1#6'Height'#2#25#3'Top' +'OnClick'#7#16'ClearButtonClick'#8'TabOrder'#2#2#0#0#0#0#12'TButtonPanel'#19
+#3'-'#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#20'BorderSpacin' +'OkCancelButtonPanel'#4'Left'#2#6#6'Height'#2'4'#3'Top'#3'I'#1#5'Width'#3#168
+'g.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'M' +#1#5'Align'#7#8'alBottom'#8'TabOrder'#2#1#11'ShowButtons'#11#4'pbOK'#8'pbCan'
+'odalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#2#0#0#18'TOpenPictureDialog' +'cel'#0#10'ShowGlyphs'#11#4'pbOK'#8'pbCancel'#7'pbClose'#6'pbHelp'#0#0#0#18
+#10'OpenDialog'#5'Title'#6#18'Open existing file'#6'Filter'#12'2'#1#0#0'Grap' +'TOpenPictureDialog'#10'OpenDialog'#5'Title'#6#18'Open existing file'#6'Filt'
+'hic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.ppm;*.pgm;*.pbm;*.p' +'er'#12'2'#1#0#0'Graphic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*'
+'ng;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm)|*.ppm|Portable Gr' +'.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.pp'
+'ayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portable Network Graphic ' +'m)|*.ppm|Portable GrayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Porta'
+'(*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp|All files (*.*)|*.' +'ble Network Graphic (*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bm'
+'*|'#11'FilterIndex'#2#0#4'left'#3#136#0#3'top'#3' '#1#0#0#18'TSavePictureDi' +'p|All files (*.*)|*.*|'#11'FilterIndex'#2#0#4'left'#3#152#0#3'top'#3#160#0#0
+'alog'#10'SaveDialog'#5'Title'#6#12'Save file as'#6'Filter'#12'2'#1#0#0'Grap' +#0#18'TSavePictureDialog'#10'SaveDialog'#5'Title'#6#12'Save file as'#6'Filte'
+'hic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.ppm;*.pgm;*.pbm;*.p' +'r'#12'2'#1#0#0'Graphic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.'
+'ng;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm)|*.ppm|Portable Gr' +'ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm'
+'ayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portable Network Graphic ' +')|*.ppm|Portable GrayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portab'
+'(*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp|All files (*.*)|*.' +'le Network Graphic (*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp'
+'*|'#11'FilterIndex'#2#0#4'left'#3#136#0#3'top'#3'@'#1#0#0#0 +'|All files (*.*)|*.*|'#11'FilterIndex'#2#0#4'left'#3#192#0#3'top'#3#160#0#0
+#0#0
]); ]);

8
ideintf/graphicpropedit.pas
View File

@ -32,10 +32,10 @@ type
{ TGraphicPropertyEditorForm } { TGraphicPropertyEditorForm }
TGraphicPropertyEditorForm = class(TForm) TGraphicPropertyEditorForm = class(TForm)
OkCancelButtonPanel: TButtonPanel;
ImagePreview: TImage; ImagePreview: TImage;
OKButton: TBitBtn;
CancelButton: TBitBtn;
LoadButton: TButton; LoadButton: TButton;
LoadSaveBtnPanel: TPanel;
SaveButton: TButton; SaveButton: TButton;
ClearButton: TButton; ClearButton: TButton;
GroupBox1: TGroupBox; GroupBox1: TGroupBox;
@ -68,8 +68,8 @@ begin
FileName := ''; FileName := '';
Caption := oisLoadImageDialog; Caption := oisLoadImageDialog;
GroupBox1.Caption:=oisPEPicture; GroupBox1.Caption:=oisPEPicture;
OKButton.Caption := oisOK; OkCancelButtonPanel.OKButton.Caption := oisOK;
CancelButton.Caption := oisCancel; OkCancelButtonPanel.CancelButton.Caption := oisCancel;
LoadButton.Caption := oisLoad; LoadButton.Caption := oisLoad;
SaveButton.Caption := oisSave; SaveButton.Caption := oisSave;
ClearButton.Caption := oisClear; ClearButton.Caption := oisClear;