mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-08 22:58:50 +02:00
improved layout of graphic prop editor form
git-svn-id: trunk@12606 -
This commit is contained in:
mattias
parent
2cf0df7f92
commit
b86924d2c6
@ -1,71 +1,43 @@
|
||||
object GraphicPropertyEditorForm: TGraphicPropertyEditorForm
|
||||
Left = 290
|
||||
Height = 330
|
||||
Height = 381
|
||||
Top = 153
|
||||
Width = 370
|
||||
HorzScrollBar.Page = 369
|
||||
VertScrollBar.Page = 329
|
||||
Width = 436
|
||||
HorzScrollBar.Page = 435
|
||||
VertScrollBar.Page = 380
|
||||
ActiveControl = LoadButton
|
||||
Caption = 'Load Image Dialog'
|
||||
ClientHeight = 381
|
||||
ClientWidth = 436
|
||||
Constraints.MinHeight = 180
|
||||
Constraints.MinWidth = 200
|
||||
OnCreate = FormCreate
|
||||
Position = poScreenCenter
|
||||
object GroupBox1: TGroupBox
|
||||
Left = 6
|
||||
Height = 289
|
||||
Height = 317
|
||||
Top = 6
|
||||
Width = 358
|
||||
Align = alTop
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
Width = 424
|
||||
Align = alClient
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'Picture'
|
||||
ClientHeight = 298
|
||||
ClientWidth = 420
|
||||
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
|
||||
Left = 5
|
||||
Height = 262
|
||||
Top = 2
|
||||
Width = 261
|
||||
AnchorSideRight.Control = GroupBox1
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = GroupBox1
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 286
|
||||
Top = 6
|
||||
Width = 349
|
||||
AutoScroll = True
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
Align = alClient
|
||||
BorderSpacing.Around = 6
|
||||
ParentColor = False
|
||||
TabOrder = 3
|
||||
TabOrder = 0
|
||||
object ImagePreview: TImage
|
||||
Height = 100
|
||||
Width = 100
|
||||
@ -73,48 +45,74 @@ object GraphicPropertyEditorForm: TGraphicPropertyEditorForm
|
||||
Center = True
|
||||
end
|
||||
end
|
||||
object LoadSaveBtnPanel: TPanel
|
||||
Left = 361
|
||||
Height = 286
|
||||
Top = 6
|
||||
Width = 53
|
||||
Align = alRight
|
||||
AutoSize = True
|
||||
BorderSpacing.Around = 6
|
||||
BevelOuter = bvNone
|
||||
ClientHeight = 286
|
||||
ClientWidth = 53
|
||||
TabOrder = 1
|
||||
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
|
||||
end
|
||||
object ClearButton: TButton
|
||||
Height = 25
|
||||
Top = 62
|
||||
Width = 53
|
||||
Align = alTop
|
||||
BorderSpacing.Bottom = 6
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Caption = 'Clear'
|
||||
OnClick = ClearButtonClick
|
||||
TabOrder = 2
|
||||
end
|
||||
end
|
||||
end
|
||||
object OKButton: TBitBtn
|
||||
Left = 207
|
||||
Height = 25
|
||||
Top = 301
|
||||
Width = 75
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.Bottom = 6
|
||||
BorderSpacing.Around = 6
|
||||
Caption = '&OK'
|
||||
Default = True
|
||||
Kind = bkOK
|
||||
ModalResult = 1
|
||||
NumGlyphs = 0
|
||||
object OkCancelButtonPanel: TButtonPanel
|
||||
Left = 6
|
||||
Height = 52
|
||||
Top = 329
|
||||
Width = 424
|
||||
Align = alBottom
|
||||
TabOrder = 1
|
||||
end
|
||||
object CancelButton: TBitBtn
|
||||
Left = 289
|
||||
Height = 25
|
||||
Top = 301
|
||||
Width = 75
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.Around = 6
|
||||
Cancel = True
|
||||
Caption = 'Cancel'
|
||||
Kind = bkCancel
|
||||
ModalResult = 2
|
||||
NumGlyphs = 0
|
||||
TabOrder = 2
|
||||
ShowButtons = [pbOK, pbCancel]
|
||||
ShowGlyphs = [pbOK, pbCancel, pbClose, pbHelp]
|
||||
end
|
||||
object OpenDialog: TOpenPictureDialog
|
||||
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 (*.*)|*.*|'
|
||||
FilterIndex = 0
|
||||
left = 136
|
||||
top = 288
|
||||
left = 152
|
||||
top = 160
|
||||
end
|
||||
object SaveDialog: TSavePictureDialog
|
||||
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 (*.*)|*.*|'
|
||||
FilterIndex = 0
|
||||
left = 136
|
||||
top = 320
|
||||
left = 192
|
||||
top = 160
|
||||
end
|
||||
end
|
||||
|
||||
@ -1,44 +1,47 @@
|
||||
{ Das ist eine automatisch erzeugte Lazarus-Ressourcendatei }
|
||||
|
||||
LazarusResources.Add('TGraphicPropertyEditorForm','FORMDATA',[
|
||||
'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'
|
||||
+#3'q'#1#18'VertScrollBar.Page'#3'I'#1#13'ActiveControl'#7#10'LoadButton'#7'C'
|
||||
+'aption'#6#17'Load Image Dialog'#21'Constraints.MinHeight'#3#180#0#20'Constr'
|
||||
+'aints.MinWidth'#3#200#0#8'OnCreate'#7#10'FormCreate'#8'Position'#7#14'poScr'
|
||||
+'eenCenter'#0#9'TGroupBox'#9'GroupBox1'#4'Left'#2#6#6'Height'#3'!'#1#3'Top'#2
|
||||
+#6#5'Width'#3'f'#1#5'Align'#7#5'alTop'#7'Anchors'#11#5'akTop'#6'akLeft'#7'ak'
|
||||
+'Right'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#7'Picture'#8
|
||||
+'TabOrder'#2#0#0#7'TButton'#10'LoadButton'#4'Left'#3#19#1#6'Height'#2#25#5'W'
|
||||
+'idth'#2'K'#7'Anchors'#11#5'akTop'#7'akRight'#0#20'BorderSpacing.Around'#2#6
|
||||
+#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#4'Load'#7'OnClick'#7#15'Load'
|
||||
+'ButtonClick'#8'TabOrder'#2#0#0#0#7'TButton'#10'SaveButton'#4'Left'#3#19#1#6
|
||||
+'Height'#2#25#3'Top'#2#31#5'Width'#2'K'#7'Anchors'#11#5'akTop'#7'akRight'#0
|
||||
+#20'BorderSpacing.Around'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6
|
||||
+#4'Save'#7'OnClick'#7#15'SaveButtonClick'#8'TabOrder'#2#1#0#0#7'TButton'#11
|
||||
+'ClearButton'#4'Left'#3#19#1#6'Height'#2#25#3'Top'#2'>'#5'Width'#2'K'#7'Anch'
|
||||
+'ors'#11#5'akTop'#7'akRight'#0#20'BorderSpacing.Around'#2#6#25'BorderSpacing'
|
||||
+'.InnerBorder'#2#4#7'Caption'#6#5'Clear'#7'OnClick'#7#16'ClearButtonClick'#8
|
||||
+'TabOrder'#2#2#0#0#10'TScrollBox'#9'ScrollBox'#4'Left'#2#5#6'Height'#3#6#1#3
|
||||
+'Top'#2#2#5'Width'#3#5#1#10'AutoScroll'#9#7'Anchors'#11#5'akTop'#6'akLeft'#7
|
||||
+'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#11'ParentColor'#8#8'Tab'
|
||||
+'Order'#2#3#0#6'TImage'#12'ImagePreview'#6'Height'#2'd'#5'Width'#2'd'#8'Auto'
|
||||
+'Size'#9#6'Center'#9#0#0#0#0#7'TBitBtn'#8'OKButton'#4'Left'#3#207#0#6'Height'
|
||||
+#2#25#3'Top'#3'-'#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#20
|
||||
+'BorderSpacing.Bottom'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#7
|
||||
+'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrde'
|
||||
+'r'#2#1#0#0#7'TBitBtn'#12'CancelButton'#4'Left'#3'!'#1#6'Height'#2#25#3'Top'
|
||||
+#3'-'#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#20'BorderSpacin'
|
||||
+'g.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'M'
|
||||
+'odalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#2#0#0#18'TOpenPictureDialog'
|
||||
+#10'OpenDialog'#5'Title'#6#18'Open existing file'#6'Filter'#12'2'#1#0#0'Grap'
|
||||
+'hic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.ppm;*.pgm;*.pbm;*.p'
|
||||
+'ng;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm)|*.ppm|Portable Gr'
|
||||
+'ayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portable Network Graphic '
|
||||
+'(*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp|All files (*.*)|*.'
|
||||
+'*|'#11'FilterIndex'#2#0#4'left'#3#136#0#3'top'#3' '#1#0#0#18'TSavePictureDi'
|
||||
+'alog'#10'SaveDialog'#5'Title'#6#12'Save file as'#6'Filter'#12'2'#1#0#0'Grap'
|
||||
+'hic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*.ppm;*.pgm;*.pbm;*.p'
|
||||
+'ng;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.ppm)|*.ppm|Portable Gr'
|
||||
+'ayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Portable Network Graphic '
|
||||
+'(*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp|All files (*.*)|*.'
|
||||
+'*|'#11'FilterIndex'#2#0#4'left'#3#136#0#3'top'#3'@'#1#0#0#0
|
||||
+'"'#1#6'Height'#3'}'#1#3'Top'#3#153#0#5'Width'#3#180#1#18'HorzScrollBar.Page'
|
||||
+#3#179#1#18'VertScrollBar.Page'#3'|'#1#13'ActiveControl'#7#10'LoadButton'#7
|
||||
+'Caption'#6#17'Load Image Dialog'#12'ClientHeight'#3'}'#1#11'ClientWidth'#3
|
||||
+#180#1#21'Constraints.MinHeight'#3#180#0#20'Constraints.MinWidth'#3#200#0#8
|
||||
+'OnCreate'#7#10'FormCreate'#8'Position'#7#14'poScreenCenter'#0#9'TGroupBox'#9
|
||||
+'GroupBox1'#4'Left'#2#6#6'Height'#3'='#1#3'Top'#2#6#5'Width'#3#168#1#5'Align'
|
||||
+#7#8'alClient'#20'BorderSpacing.Around'#2#6#7'Caption'#6#7'Picture'#12'Clien'
|
||||
+'tHeight'#3'*'#1#11'ClientWidth'#3#164#1#8'TabOrder'#2#0#0#10'TScrollBox'#9
|
||||
+'ScrollBox'#23'AnchorSideRight.Control'#7#9'GroupBox1'#20'AnchorSideRight.Si'
|
||||
+'de'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#9'GroupBox1'#21'AnchorSid'
|
||||
+'eBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#30#1#3'Top'#2#6#5'Widt'
|
||||
+'h'#3']'#1#10'AutoScroll'#9#5'Align'#7#8'alClient'#20'BorderSpacing.Around'#2
|
||||
+#6#11'ParentColor'#8#8'TabOrder'#2#0#0#6'TImage'#12'ImagePreview'#6'Height'#2
|
||||
+'d'#5'Width'#2'd'#8'AutoSize'#9#6'Center'#9#0#0#0#6'TPanel'#16'LoadSaveBtnPa'
|
||||
+'nel'#4'Left'#3'i'#1#6'Height'#3#30#1#3'Top'#2#6#5'Width'#2'5'#5'Align'#7#7
|
||||
+'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#10'BevelOuter'#7#6'bvNo'
|
||||
+'ne'#12'ClientHeight'#3#30#1#11'ClientWidth'#2'5'#8'TabOrder'#2#1#0#7'TButto'
|
||||
+'n'#10'LoadButton'#6'Height'#2#25#5'Width'#2'5'#5'Align'#7#5'alTop'#20'Borde'
|
||||
+'rSpacing.Bottom'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#4'Load'
|
||||
+#7'OnClick'#7#15'LoadButtonClick'#8'TabOrder'#2#0#0#0#7'TButton'#10'SaveButt'
|
||||
+'on'#6'Height'#2#25#3'Top'#2#31#5'Width'#2'5'#5'Align'#7#5'alTop'#20'BorderS'
|
||||
+'pacing.Bottom'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#4'Save'#7
|
||||
+'OnClick'#7#15'SaveButtonClick'#8'TabOrder'#2#1#0#0#7'TButton'#11'ClearButto'
|
||||
+'n'#6'Height'#2#25#3'Top'#2'>'#5'Width'#2'5'#5'Align'#7#5'alTop'#20'BorderSp'
|
||||
+'acing.Bottom'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#5'Clear'#7
|
||||
+'OnClick'#7#16'ClearButtonClick'#8'TabOrder'#2#2#0#0#0#0#12'TButtonPanel'#19
|
||||
+'OkCancelButtonPanel'#4'Left'#2#6#6'Height'#2'4'#3'Top'#3'I'#1#5'Width'#3#168
|
||||
+#1#5'Align'#7#8'alBottom'#8'TabOrder'#2#1#11'ShowButtons'#11#4'pbOK'#8'pbCan'
|
||||
+'cel'#0#10'ShowGlyphs'#11#4'pbOK'#8'pbCancel'#7'pbClose'#6'pbHelp'#0#0#0#18
|
||||
+'TOpenPictureDialog'#10'OpenDialog'#5'Title'#6#18'Open existing file'#6'Filt'
|
||||
+'er'#12'2'#1#0#0'Graphic (*.ico;*.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp)|*.ico;*'
|
||||
+'.ppm;*.pgm;*.pbm;*.png;*.xpm;*.bmp|Icon (*.ico)|*.ico|Portable PixMap (*.pp'
|
||||
+'m)|*.ppm|Portable GrayMap (*.pgm)|*.pgm|Portable BitMap (*.pbm)|*.pbm|Porta'
|
||||
+'ble Network Graphic (*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bm'
|
||||
+'p|All files (*.*)|*.*|'#11'FilterIndex'#2#0#4'left'#3#152#0#3'top'#3#160#0#0
|
||||
+#0#18'TSavePictureDialog'#10'SaveDialog'#5'Title'#6#12'Save file as'#6'Filte'
|
||||
+'r'#12'2'#1#0#0'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|Portab'
|
||||
+'le Network Graphic (*.png)|*.png|Pixmap (*.xpm)|*.xpm|Bitmaps (*.bmp)|*.bmp'
|
||||
+'|All files (*.*)|*.*|'#11'FilterIndex'#2#0#4'left'#3#192#0#3'top'#3#160#0#0
|
||||
+#0#0
|
||||
]);
|
||||
|
||||
@ -32,10 +32,10 @@ type
|
||||
{ TGraphicPropertyEditorForm }
|
||||
|
||||
TGraphicPropertyEditorForm = class(TForm)
|
||||
OkCancelButtonPanel: TButtonPanel;
|
||||
ImagePreview: TImage;
|
||||
OKButton: TBitBtn;
|
||||
CancelButton: TBitBtn;
|
||||
LoadButton: TButton;
|
||||
LoadSaveBtnPanel: TPanel;
|
||||
SaveButton: TButton;
|
||||
ClearButton: TButton;
|
||||
GroupBox1: TGroupBox;
|
||||
@ -68,8 +68,8 @@ begin
|
||||
FileName := '';
|
||||
Caption := oisLoadImageDialog;
|
||||
GroupBox1.Caption:=oisPEPicture;
|
||||
OKButton.Caption := oisOK;
|
||||
CancelButton.Caption := oisCancel;
|
||||
OkCancelButtonPanel.OKButton.Caption := oisOK;
|
||||
OkCancelButtonPanel.CancelButton.Caption := oisCancel;
|
||||
LoadButton.Caption := oisLoad;
|
||||
SaveButton.Caption := oisSave;
|
||||
ClearButton.Caption := oisClear;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user