doublecmd/ffileassoc.lfm
2008-09-05 18:38:45 +00:00

364 lines
9 KiB
Text
Raw Blame History

object frmFileAssoc: TfrmFileAssoc
Left = 269
Height = 582
Top = 33
Width = 554
HorzScrollBar.Page = 553
VertScrollBar.Page = 581
ActiveControl = lbFileTypes
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'File associations'
ClientHeight = 582
ClientWidth = 554
Font.Color = clBlack
Font.Height = 13
Font.Pitch = fpVariable
OnCreate = FormCreate
Position = poDesktopCenter
object gbFileTypes: TGroupBox
Height = 528
Width = 265
Caption = 'File types'
ClientHeight = 510
ClientWidth = 261
TabOrder = 0
object lbFileTypes: TListBox
Left = 10
Height = 418
Top = 6
Width = 244
Color = clWhite
Font.Color = clBlack
Font.Pitch = fpVariable
ItemHeight = 20
OnDrawItem = lbFileTypesDrawItem
OnSelectionChange = lbFileTypesSelectionChange
Style = lbOwnerDrawFixed
TabOrder = 0
end
object btnAddNewType: TButton
AnchorSideTop.Control = lbFileTypes
AnchorSideTop.Side = asrBottom
Left = 10
Height = 32
Top = 430
Width = 244
BorderSpacing.Top = 6
Caption = 'Add'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnAddNewTypeClick
TabOrder = 1
end
object btnRemoveType: TButton
AnchorSideTop.Control = btnAddNewType
AnchorSideTop.Side = asrBottom
Left = 10
Height = 32
Top = 468
Width = 118
BorderSpacing.Top = 6
Caption = 'Remove'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnRemoveTypeClick
TabOrder = 3
end
object btnRenameType: TButton
AnchorSideTop.Control = btnAddNewType
AnchorSideTop.Side = asrBottom
Left = 136
Height = 32
Top = 468
Width = 118
BorderSpacing.Top = 6
Caption = 'Rename'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnRenameTypeClick
TabOrder = 2
end
end
object gbExts: TGroupBox
AnchorSideLeft.Control = gbFileTypes
AnchorSideLeft.Side = asrBottom
Left = 271
Height = 135
Top = 2
Width = 273
BorderSpacing.Left = 6
Caption = 'Extensions'
ClientHeight = 117
ClientWidth = 269
TabOrder = 1
object lbExts: TListBox
Left = 10
Height = 102
Top = 6
Width = 145
Color = clWhite
Font.Color = clBlack
Font.Pitch = fpVariable
ItemHeight = 20
Style = lbStandard
TabOrder = 0
TabStop = False
end
object btnAddExt: TButton
AnchorSideLeft.Control = lbExts
AnchorSideLeft.Side = asrBottom
Left = 161
Height = 32
Top = 6
Width = 100
BorderSpacing.Left = 6
Caption = 'Add'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnAddExtClick
TabOrder = 1
end
object btnRemoveExt: TButton
AnchorSideLeft.Control = lbExts
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnAddExt
AnchorSideTop.Side = asrBottom
Left = 161
Height = 32
Top = 44
Width = 100
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Remove'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnRemoveExtClick
TabOrder = 2
end
end
object gbActions: TGroupBox
AnchorSideLeft.Control = gbFileTypes
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = gbExts
AnchorSideTop.Side = asrBottom
Left = 271
Height = 305
Top = 143
Width = 273
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Actions'
ClientHeight = 287
ClientWidth = 269
TabOrder = 2
object lblCommand: TLabel
AnchorSideTop.Control = ledAction
AnchorSideTop.Side = asrBottom
Left = 10
Height = 14
Top = 226
Width = 52
BorderSpacing.Top = 6
Caption = '&Command:'
ParentColor = False
end
object lbActions: TListBox
Left = 10
Height = 163
Top = 6
Width = 145
Color = clWhite
Font.Color = clBlack
Font.Pitch = fpVariable
ItemHeight = 20
OnSelectionChange = lbActionsSelectionChange
Style = lbStandard
TabOrder = 0
end
object btnUpAct: TButton
AnchorSideLeft.Control = lbActions
AnchorSideLeft.Side = asrBottom
Left = 161
Height = 32
Top = 6
Width = 100
BorderSpacing.Left = 6
Caption = 'Up'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnUpActClick
TabOrder = 1
end
object btnDownAct: TButton
AnchorSideLeft.Control = lbActions
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnUpAct
AnchorSideTop.Side = asrBottom
Left = 161
Height = 32
Top = 44
Width = 100
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Down'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnDownActClick
TabOrder = 2
end
object btnAddAct: TButton
AnchorSideLeft.Control = lbActions
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnDownAct
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 161
Height = 32
Top = 82
Width = 100
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Add'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnAddActClick
TabOrder = 3
end
object btnRemoveAct: TButton
AnchorSideLeft.Control = lbActions
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnAddAct
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 161
Height = 32
Top = 120
Width = 100
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Remove'
Font.Color = clBlack
Font.Pitch = fpVariable
OnClick = btnRemoveActClick
TabOrder = 4
end
object ledAction: TLabeledEdit
AnchorSideTop.Control = lbActions
AnchorSideTop.Side = asrBottom
Left = 10
Height = 23
Top = 197
Width = 251
BorderSpacing.Top = 28
EditLabel.Left = 10
EditLabel.Height = 14
EditLabel.Top = 180
EditLabel.Width = 35
EditLabel.Caption = 'Action:'
EditLabel.ParentColor = False
ParentColor = False
TabOrder = 5
OnChange = ledActionChange
end
object fneCommand: TFileNameEdit
AnchorSideTop.Control = lblCommand
AnchorSideTop.Side = asrBottom
Left = 10
Height = 23
Top = 246
Width = 229
ButtonWidth = 23
NumGlyphs = 1
BorderSpacing.Top = 6
ParentColor = False
TabOrder = 6
OnChange = fneCommandChange
end
end
object gbIcon: TGroupBox
AnchorSideLeft.Control = gbFileTypes
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = gbActions
AnchorSideTop.Side = asrBottom
Left = 271
Height = 74
Top = 454
Width = 273
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Icon'
ClientHeight = 56
ClientWidth = 269
TabOrder = 3
object sbtnIcon: TSpeedButton
Left = 10
Height = 38
Top = 6
Width = 38
Color = clBtnFace
Font.Color = clBlack
Font.Height = 13
Font.Pitch = fpVariable
NumGlyphs = 0
OnClick = sbtnIconClick
end
object edtIconFileName: TEdit
AnchorSideTop.Control = sbtnIcon
AnchorSideTop.Side = asrCenter
AnchorSideRight.Side = asrBottom
Left = 55
Height = 23
Top = 14
Width = 184
Anchors = [akTop, akLeft, akRight]
TabOrder = 0
end
end
object pnlButtonPanel: TPanel
Height = 50
Top = 532
Width = 554
Align = alBottom
BevelInner = bvLowered
ClientHeight = 50
ClientWidth = 554
TabOrder = 4
object btnOK: TBitBtn
AnchorSideTop.Control = btnCancel
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = btnCancel
Left = 346
Height = 32
Top = 12
Width = 90
Anchors = [akTop, akRight]
BorderSpacing.Right = 6
Caption = '&OK'
Kind = bkOK
ModalResult = 1
NumGlyphs = 0
OnClick = btnOKClick
TabOrder = 0
end
object btnCancel: TBitBtn
Left = 442
Height = 32
Top = 12
Width = 90
Anchors = [akTop, akRight]
Cancel = True
Caption = 'Cancel'
Kind = bkCancel
ModalResult = 2
NumGlyphs = 0
OnClick = btnCancelClick
TabOrder = 1
end
end
object OpenPictureDialog: TOpenPictureDialog
Title = '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>'
left = 16
top = 544
end
end