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
|
object ConfigFPImageExportForm: TConfigFPImageExportForm
Left = 485
Height = 203
Top = 343
Width = 332
BorderStyle = bsDialog
Caption = 'Export to images'
ClientHeight = 203
ClientWidth = 332
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '1.7'
object FEBaseFileName: TFileNameEdit
Left = 80
Height = 18
Top = 14
Width = 240
DialogKind = dkSave
DialogTitle = 'Base filename for image export'
DialogOptions = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
Filter = 'PDF Files|*.pdf|All files|*.*'
FilterIndex = 0
DefaultExt = '.pdf'
HideDirectories = False
ButtonWidth = 23
NumGlyphs = 1
Flat = True
MaxLength = 0
TabOrder = 0
end
object LFEPDF: TLabel
Left = 6
Height = 18
Top = 14
Width = 70
Alignment = taRightJustify
AutoSize = False
Caption = '&Filename'
FocusControl = FEBaseFileName
Layout = tlCenter
ParentColor = False
end
object BPExport: TButtonPanel
Left = 6
Height = 33
Top = 164
Width = 320
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 1
ShowButtons = [pbOK, pbCancel]
end
object GBOptions: TGroupBox
Left = 16
Height = 120
Top = 40
Width = 305
Caption = 'Options'
ClientHeight = 92
ClientWidth = 301
TabOrder = 2
object LCBDPI: TLabel
Left = 17
Height = 20
Top = 8
Width = 63
Alignment = taRightJustify
AutoSize = False
Caption = '&DPI'
FocusControl = CBDPI
Layout = tlCenter
ParentColor = False
end
object CBDPI: TComboBox
Left = 88
Height = 20
Top = 8
Width = 60
ItemHeight = 0
Items.Strings = (
'72'
'96'
'120'
'150'
'300'
)
TabOrder = 0
end
object SEDigits: TSpinEdit
Left = 88
Height = 18
Top = 35
Width = 56
MaxValue = 6
MinValue = 1
TabOrder = 1
Value = 1
end
object LSEDigits: TLabel
Left = 8
Height = 18
Top = 35
Width = 72
Alignment = taRightJustify
AutoSize = False
Caption = '&Min. digits'
FocusControl = SEDigits
Layout = tlCenter
ParentColor = False
end
object ESeparator: TEdit
Left = 88
Height = 18
Top = 64
Width = 80
MaxLength = 1
TabOrder = 2
end
object LESeparator: TLabel
Left = 8
Height = 18
Top = 64
Width = 72
Alignment = taRightJustify
AutoSize = False
Caption = '&Separator'
FocusControl = ESeparator
Layout = tlCenter
ParentColor = False
end
end
end
|