1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139
|
object formVectorialConverter: TformVectorialConverter
Left = 216
Height = 481
Top = 192
Width = 297
AutoSize = True
BorderStyle = bsSingle
Caption = 'FP Vectorial Converter'
ClientHeight = 481
ClientWidth = 297
LCLVersion = '1.7'
object Label1: TLabel
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 8
Height = 15
Top = 133
Width = 133
BorderSpacing.Left = 8
BorderSpacing.Top = 8
Caption = 'Location of the Input file:'
ParentColor = False
end
object Label2: TLabel
Left = 8
Height = 120
Top = 5
Width = 281
Align = alTop
BorderSpacing.Left = 8
BorderSpacing.Top = 5
BorderSpacing.Right = 8
Caption = 'This converter application uses the fpvectorial library to convert between various different vectorial graphics formats. The type is detected from the extension and the supported types are: '#13#10'- PDF (*.pdf)'#13#10'- SVG (*.svg)'#13#10'- Corel Draw file (*.cdr)'#13#10'- Windows Metafile (*.wmf).'
Font.Height = -12
ParentColor = False
ParentFont = False
WordWrap = True
end
object editInput: TFileNameEdit
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
Left = 8
Height = 23
Top = 152
Width = 281
DialogOptions = []
FilterIndex = 0
HideDirectories = False
ButtonWidth = 23
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 8
BorderSpacing.Top = 4
BorderSpacing.Right = 4
MaxLength = 0
TabOrder = 0
end
object Label3: TLabel
AnchorSideTop.Control = editInput
AnchorSideTop.Side = asrBottom
Left = 8
Height = 15
Top = 183
Width = 143
BorderSpacing.Left = 8
BorderSpacing.Top = 8
Caption = 'Full path of the Output file:'
ParentColor = False
end
object editOutput: TFileNameEdit
AnchorSideTop.Control = Label3
AnchorSideTop.Side = asrBottom
Left = 8
Height = 23
Top = 202
Width = 281
DialogOptions = []
FilterIndex = 0
HideDirectories = False
ButtonWidth = 23
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 8
BorderSpacing.Top = 4
BorderSpacing.Right = 4
MaxLength = 0
TabOrder = 1
end
object buttonConvert: TButton
AnchorSideTop.Control = buttonVisualize
Left = 80
Height = 25
Top = 233
Width = 67
Caption = 'Convert'
OnClick = buttonConvertClick
TabOrder = 2
end
object buttonQuit: TButton
AnchorSideTop.Control = buttonVisualize
Left = 160
Height = 25
Top = 233
Width = 59
Caption = 'Quit'
OnClick = buttonQuitClick
TabOrder = 3
end
object imagePreview: TImage
AnchorSideTop.Control = buttonVisualize
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 8
Height = 208
Top = 266
Width = 281
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 8
BorderSpacing.Top = 8
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
Constraints.MinHeight = 200
end
object buttonVisualize: TButton
AnchorSideTop.Control = editOutput
AnchorSideTop.Side = asrBottom
Left = 8
Height = 25
Top = 233
Width = 62
BorderSpacing.Left = 8
BorderSpacing.Top = 8
Caption = 'Visualize'
OnClick = buttonVisualizeClick
TabOrder = 4
end
end
|