pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity
Files
1936a8069254f6b993d948556bd9a0a8b66f6f16
lazarus-ccr/components/tvplanit/source/vpedfmtlst.lfm
wp_xxyyzz 1936a80692 tvplanit: Fix compilation under Laz 1.6.x 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5880 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2017-05-19 23:28:06 +00:00

376 lines
10 KiB
Plaintext
Raw Blame History

object frmPrnFormat: TfrmPrnFormat
Left = 517
Height = 490
Top = 274
Width = 694
ActiveControl = lbFormats
Caption = 'Print Format Designer'
ClientHeight = 490
ClientWidth = 694
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '1.9.0.0'
object LblFormats: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 6
Height = 15
Top = 8
Width = 46
BorderSpacing.Left = 6
BorderSpacing.Top = 8
Caption = '&Formats:'
FocusControl = lbFormats
ParentColor = False
end
object LblElements: TLabel
AnchorSideLeft.Control = LblFormats
AnchorSideTop.Control = Owner
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 238
Width = 51
BorderSpacing.Top = 8
Caption = 'Ele&ments:'
FocusControl = lbElements
ParentColor = False
end
object btnMoveElementUp: TSpeedButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = LblPrintOrder
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Control = btnMoveElementDn
Left = 336
Height = 22
Top = 409
Width = 23
Anchors = [akLeft, akBottom]
BorderSpacing.Top = 4
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
333333333333333333333333337777733333333333FFFFF33333333334444473
33333333377777F3333333333CCCC47333333333377777F3333333333CCCC473
33333333377777F3333333333CCCC47333333333377777F3333333333CCCC473
33333333377777F3333333333CCCC47773333333377777FFF333333CCCCCCCCC
333333377777777733333333CCCCCCC33333333377777773333333333CCCCC33
33333333377777333333333333CCC333333333333377733333333333333C3333
3333333333373333333333333333333333333333333333333333
}
NumGlyphs = 2
OnClick = btnMoveElementUpClick
end
object btnMoveElementDn: TSpeedButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = btnMoveElementUp
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Control = lbElements
AnchorSideBottom.Side = asrBottom
Left = 336
Height = 22
Top = 435
Width = 23
Anchors = [akLeft, akBottom]
BorderSpacing.Top = 4
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333337333
333333333333F3333333333333347733333333333337FF333333333333CC4773
3333333333777FF3333333333CCCC47733333333377777FF33333333CCCCCC47
733333337777777FF333333CCCCCC4443333333777777777333333333CCCC473
33333333377777F3333333333CCCC47333333333377777F3333333333CCCC473
33333333377777F3333333333CCCC47333333333377777F3333333333CCCC473
33333333377777F3333333333CCCC43333333333377777333333333333333333
3333333333333333333333333333333333333333333333333333
}
NumGlyphs = 2
OnClick = btnMoveElementDnClick
end
object LblPrintOrder: TLabel
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideBottom.Control = btnMoveElementUp
Left = 318
Height = 15
Top = 390
Width = 58
Alignment = taCenter
Anchors = [akLeft, akBottom]
Caption = 'Print Order'
ParentColor = False
WordWrap = True
end
object btnNewFormat: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = lbFormats
Left = 310
Height = 25
Top = 27
Width = 75
Caption = '&New'
Enabled = False
OnClick = btnNewFormatClick
TabOrder = 1
end
object lbFormats: TListBox
AnchorSideLeft.Control = LblFormats
AnchorSideTop.Control = LblFormats
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = btnNewFormat
AnchorSideBottom.Control = LblElements
Left = 6
Height = 203
Top = 27
Width = 300
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Top = 4
BorderSpacing.Right = 4
Columns = 1
ItemHeight = 0
OnClick = lbFormatsClick
Sorted = True
TabOrder = 0
end
object lbElements: TListBox
AnchorSideLeft.Control = LblFormats
AnchorSideTop.Control = LblElements
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = lbFormats
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ButtonPanel
Left = 6
Height = 200
Top = 257
Width = 300
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Top = 4
ItemHeight = 0
OnClick = lbElementsClick
OnDragDrop = lbElementsDragDrop
OnDragOver = lbElementsDragOver
OnMouseDown = lbElementsMouseDown
TabOrder = 4
end
object btnEditFormat: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = btnNewFormat
AnchorSideTop.Side = asrBottom
Left = 310
Height = 25
Top = 56
Width = 75
BorderSpacing.Top = 4
Caption = '&Edit'
Enabled = False
OnClick = btnEditFormatClick
TabOrder = 2
end
object btnDeleteFormat: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = btnEditFormat
AnchorSideTop.Side = asrBottom
Left = 310
Height = 25
Top = 85
Width = 75
BorderSpacing.Top = 4
Caption = '&Delete'
Enabled = False
OnClick = btnDeleteFormatClick
TabOrder = 3
end
object btnNewElement: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = lbElements
Left = 310
Height = 25
Top = 257
Width = 75
Caption = 'Ne&w'
Enabled = False
OnClick = btnNewElementClick
TabOrder = 5
end
object btnEditElement: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = btnNewElement
AnchorSideTop.Side = asrBottom
Left = 310
Height = 25
Top = 286
Width = 75
BorderSpacing.Top = 4
Caption = 'E&dit'
Enabled = False
OnClick = btnEditElementClick
TabOrder = 6
end
object btnDeleteElement: TButton
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = btnEditElement
AnchorSideTop.Side = asrBottom
Left = 310
Height = 25
Top = 315
Width = 75
BorderSpacing.Top = 4
Caption = 'De&lete'
Enabled = False
OnClick = btnDeleteElementClick
TabOrder = 7
end
object ButtonPanel: TPanel
Left = 0
Height = 33
Top = 457
Width = 694
Align = alBottom
AutoSize = True
BevelOuter = bvNone
ClientHeight = 33
ClientWidth = 694
TabOrder = 8
object btnLoadFile: TButton
AnchorSideLeft.Control = btnNewFile
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnOk
AnchorSideBottom.Control = btnOk
AnchorSideBottom.Side = asrBottom
Left = 81
Height = 25
Top = 4
Width = 82
Anchors = [akTop, akLeft, akBottom]
AutoSize = True
BorderSpacing.Left = 4
Caption = 'L&oad File...'
OnClick = btnLoadFileClick
TabOrder = 1
end
object btnSaveFile: TButton
AnchorSideLeft.Control = btnLoadFile
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnOk
AnchorSideBottom.Control = btnOk
AnchorSideBottom.Side = asrBottom
Left = 167
Height = 25
Top = 4
Width = 80
Anchors = [akTop, akLeft, akBottom]
AutoSize = True
BorderSpacing.Left = 4
Caption = '&Save File...'
OnClick = btnSaveFileClick
TabOrder = 2
end
object btnNewFile: TButton
AnchorSideLeft.Control = ButtonPanel
AnchorSideTop.Control = btnOk
AnchorSideBottom.Control = btnOk
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 25
Top = 4
Width = 71
Anchors = [akTop, akLeft, akBottom]
AutoSize = True
BorderSpacing.Left = 6
Caption = 'New &File'
OnClick = btnNewFileClick
TabOrder = 0
end
object btnOk: TButton
AnchorSideRight.Control = ButtonPanel
AnchorSideRight.Side = asrBottom
Left = 646
Height = 25
Top = 4
Width = 42
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Top = 4
BorderSpacing.Right = 6
BorderSpacing.Bottom = 4
Caption = 'OK'
Default = True
OnClick = btnOkClick
TabOrder = 3
end
end
object Bevel1: TBevel
Left = 688
Height = 457
Top = 0
Width = 6
Align = alRight
Shape = bsSpacer
end
object LblPrintPreview: TLabel
AnchorSideLeft.Control = btnNewFormat
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = LblFormats
Left = 389
Height = 15
Top = 8
Width = 44
BorderSpacing.Left = 4
Caption = 'Preview:'
ParentColor = False
end
object PrintPreview: TVpPrintPreview
AnchorSideLeft.Control = LblPrintPreview
AnchorSideTop.Control = lbFormats
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = lbElements
AnchorSideBottom.Side = asrBottom
Left = 389
Height = 430
Top = 27
Width = 305
CurPage = 0
DrawingStyle = dsFlat
EndDate = 37377.6447728357
StartDate = 37370.6447728357
Anchors = [akTop, akLeft, akRight, akBottom]
Parent = Owner
TabStop = True
TabOrder = 9
end
object OpenDialog1: TOpenDialog
Title = 'Open filter file'
DefaultExt = '.xml'
FileName = '*.xml'
Filter = 'Filter Files (.xml)|*.xml|All Files (*.*)|*.*'
left = 400
top = 128
end
object SaveDialog1: TSaveDialog
Title = 'Save formats as'
DefaultExt = '.xml'
FileName = '*.xml'
Filter = 'Filter Files (.xml)|*.xml|All Files (*.*)|*.*'
Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
left = 400
top = 200
end
end
Reference in New Issue View Git Blame Copy Permalink