object FormOptions: TFormOptions
Left = 10
Top = 139
BorderStyle = bsDialog
Caption = 'Options'
ClientHeight = 352
ClientWidth = 442
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OnActivate = FormActivate
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Bevel2: TBevel
Left = 0
Top = 300
Width = 441
Height = 20
end
object SpeedButton1: TSpeedButton
Left = 48
Top = 325
Width = 25
Height = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000012000000140000000100
040000000000F00000000000000000000000100000001000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111110000001111111111111111110000001111111110111111110000001111
1111100111111100000011111111100011111100000011000000000001111100
0000110000000000001111000000110000000000000111000000110000000000
0000110000001100000000000000010000001100000000000000000000001100
0000000000000100000011000000000000001100000011000000000000011100
0000110000000000001111000000110000000000011111000000111111111000
1111110000001111111110011111110000001111111110111111110000001111
11111111111111000000}
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 16
Top = 325
Width = 25
Height = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000012000000140000000100
040000000000F00000000000000000000000100000001000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111110000001111111111111111110000001111111110111111110000001111
1111001111111100000011111110001111111100000011111100000000000100
0000111110000000000001000000111100000000000001000000111000000000
0000010000001100000000000000010000001000000000000000010000001100
0000000000000100000011100000000000000100000011110000000000000100
0000111110000000000001000000111111000000000001000000111111100011
1111110000001111111100111111110000001111111110111111110000001111
11111111111111000000}
OnClick = SpeedButton2Click
end
object PaintBox1: TPaintBox
Left = 136
Top = 16
Width = 105
Height = 105
end
object LblShortHelp: TLabel
Left = 2
Top = 304
Width = 27
Height = 13
Caption = ' '
Color = clBtnFace
ParentColor = False
end
object BtnOk: TButton
Left = 152
Top = 325
Width = 90
Height = 25
Caption = '&Ok'
ModalResult = 1
TabOrder = 0
OnClick = BtnOkClick
end
object BtnCancel: TButton
Left = 248
Top = 325
Width = 90
Height = 25
Caption = '&Cancel'
ModalResult = 2
TabOrder = 1
OnClick = BtnCancelClick
end
object BtnOptionsHelp: TButton
Left = 344
Top = 325
Width = 90
Height = 25
Caption = '&Help'
TabOrder = 2
OnClick = BtnOptionsHelpClick
end
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 441
Height = 297
ActivePage = TabSheet1
TabOrder = 3
object TabSheet1: TTabSheet
Caption = 'General'
object GroupBox2: TGroupBox
Left = 8
Top = 8
Width = 209
Height = 49
Caption = 'Headline'
TabOrder = 0
object EditHeadLine: TEdit
Left = 8
Top = 20
Width = 193
Height = 15
Hint = '|This is the headline for your html-index and the CD-cover.'
BorderStyle = bsNone
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
end
object GroupBox3: TGroupBox
Left = 4
Top = 120
Width = 425
Height = 145
Caption = 'Compression Tools'
TabOrder = 1
object SpeedButton4: TSpeedButton
Left = 264
Top = 40
Width = 21
Height = 21
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000007B
7B007394AD0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222222222222222200000000000222220011111111102222030111111111
0222043011111111102203430111111111020434300000000000034343434302
2222043434343402222203430000000222222000222222220002222222222222
2002222222220222020222222222200022222222222222222222}
OnClick = SpeedButton4Click
end
object Label12: TLabel
Left = 8
Top = 42
Width = 23
Height = 13
Caption = 'ARJ:'
end
object Label14: TLabel
Left = 296
Top = 20
Width = 120
Height = 91
Caption =
'It'#39's absolutly necessary that the packer will be closed after ex' +
'ecution. In the explorer right-click on e.g. rar go to '#39'program'#39 +
' and select '#39'close on exit'#39'.'
WordWrap = True
end
object Label10: TLabel
Left = 8
Top = 80
Width = 51
Height = 13
Caption = 'Extension:'
end
object Label25: TLabel
Left = 64
Top = 80
Width = 44
Height = 13
Caption = 'Archiver:'
end
object SpeedButton7: TSpeedButton
Left = 264
Top = 96
Width = 21
Height = 21
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000007B
7B007394AD0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222222222222222200000000000222220011111111102222030111111111
0222043011111111102203430111111111020434300000000000034343434302
2222043434343402222203430000000222222000222222220002222222222222
2002222222220222020222222222200022222222222222222222}
OnClick = SpeedButton7Click
end
object Label26: TLabel
Left = 200
Top = 80
Width = 39
Height = 13
Caption = 'Params:'
end
object Label11: TLabel
Left = 8
Top = 20
Width = 193
Height = 13
Caption = 'Please note, that zip-support is internal!'
end
object Label41: TLabel
Left = 290
Top = 128
Width = 3
Height = 13
Caption = ' '
end
object Edit4: TEdit
Left = 60
Top = 40
Width = 197
Height = 15
Hint = '|This is the path for arj.exe.'
BorderStyle = bsNone
OEMConvert = True
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object Edit1: TEdit
Left = 8
Top = 96
Width = 41
Height = 15
Hint = '|This is the extension for the user-archiver.'
BorderStyle = bsNone
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object Edit2: TEdit
Left = 60
Top = 96
Width = 133
Height = 15
Hint = '|Select an archiver of your choice.'
BorderStyle = bsNone
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object Edit7: TEdit
Left = 200
Top = 96
Width = 57
Height = 15
Hint = '|Here you have to give the parameters to extract files.'
BorderStyle = bsNone
ParentShowHint = False
ShowHint = True
TabOrder = 3
end
end
object GroupBox13: TGroupBox
Left = 224
Top = 8
Width = 205
Height = 49
Caption = 'Size-Format'
TabOrder = 2
object ComboBoxSizeFormat: TComboBox
Left = 8
Top = 18
Width = 145
Height = 21
ItemHeight = 13
Items.Strings = (
'Auto'
'1.234.567 Byte'
'1.234 KB'
'1.2 MB')
TabOrder = 0
end
end
object GroupBox4: TGroupBox
Left = 4
Top = 64
Width = 213
Height = 49
Caption = 'Autosave'
TabOrder = 3
object CheckBox7: TCheckBox
Left = 8
Top = 18
Width = 201
Height = 17
Hint =
'|If enabled, cd2html saves the option-setting when you leave the' +
' program.'
Caption = 'Autosave Options'
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 0
end
end
end
object TabSheet6: TTabSheet
Caption = 'UserMenu'
object GroupBox11: TGroupBox
Left = 8
Top = 8
Width = 417
Height = 121
Caption = 'Ini-Settings'
TabOrder = 0
object Label42: TLabel
Left = 240
Top = 24
Width = 133
Height = 52
Caption =
'If you want to use the settings from the command line, so don'#39't ' +
'use spaces in the names.'
WordWrap = True
end
object ComboBox4: TComboBox
Left = 16
Top = 24
Width = 209
Height = 21
Hint =
'|These are predefined option-settings. Use this to change your s' +
'ettings quickly.'
Style = csDropDownList
ItemHeight = 0
ParentShowHint = False
ShowHint = True
Sorted = True
TabOrder = 0
OnChange = ComboBox4Change
end
object Button1: TButton
Left = 16
Top = 56
Width = 89
Height = 25
Hint = '|Save changes.'
Caption = '&Save'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = Button1Click
end
object Button2: TButton
Left = 16
Top = 88
Width = 89
Height = 25
Hint = '|Save under a new name.'
Caption = 'Save&As'
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = Button2Click
end
object Button3: TButton
Left = 120
Top = 56
Width = 89
Height = 25
Hint = '|Delete an options-set.'
Caption = '&Delete'
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = Button3Click
end
end
end
object TabSheet8: TTabSheet
Caption = 'Files'
object GroupBox5: TGroupBox
Left = 4
Top = 4
Width = 261
Height = 257
Caption = 'HTML File Creating'
TabOrder = 0
object Label47: TLabel
Left = 32
Top = 72
Width = 83
Height = 13
Caption = 'Entries per Page:'
end
object Label48: TLabel
Left = 32
Top = 168
Width = 87
Height = 13
Caption = 'Root Level Layout'
end
object Label49: TLabel
Left = 32
Top = 208
Width = 115
Height = 13
Caption = 'Layout for other Entries'
end
object Label50: TLabel
Left = 32
Top = 96
Width = 172
Height = 13
Caption = 'HTML Code for previous/next page:'
end
object RadioButton1: TRadioButton
Left = 8
Top = 24
Width = 249
Height = 17
Caption = 'Create one HTML-file'
Checked = True
TabOrder = 0
TabStop = True
end
object RadioButton4: TRadioButton
Left = 8
Top = 48
Width = 249
Height = 17
Caption = 'Limit entries per page'
TabOrder = 1
end
object RadioButton5: TRadioButton
Left = 8
Top = 144
Width = 249
Height = 17
Caption = 'Create one file for each Directory'
TabOrder = 2
end
object Edit8: TEdit
Left = 132
Top = 72
Width = 33
Height = 15
BorderStyle = bsNone
MaxLength = 2
TabOrder = 3
Text = '20'
OnKeyUp = Edit8KeyUp
end
object UpDown5: TUpDown
Left = 165
Top = 72
Width = 12
Height = 15
Associate = Edit8
Min = 1
Max = 99
Position = 20
TabOrder = 4
Wrap = False
end
object ComboBox5: TComboBox
Left = 44
Top = 184
Width = 145
Height = 21
ItemHeight = 13
Items.Strings = (
''
'')
TabOrder = 5
end
object ComboBox6: TComboBox
Left = 44
Top = 224
Width = 145
Height = 21
ItemHeight = 13
Items.Strings = (
''
'')
TabOrder = 6
end
object Edit10: TEdit
Left = 32
Top = 112
Width = 100
Height = 15
BorderStyle = bsNone
TabOrder = 7
Text = '<-- previous'
end
object Edit11: TEdit
Left = 149
Top = 112
Width = 100
Height = 15
BorderStyle = bsNone
TabOrder = 8
Text = 'next -->'
end
object Edit12: TEdit
Left = 134
Top = 112
Width = 13
Height = 15
BorderStyle = bsNone
TabOrder = 9
Text = ' | '
end
end
object GroupBox15: TGroupBox
Left = 268
Top = 4
Width = 161
Height = 73
Caption = 'descript.ion/files.bbs'
TabOrder = 1
object CheckBox16: TCheckBox
Left = 8
Top = 20
Width = 149
Height = 17
Caption = 'OEM (DOS) conversation'
TabOrder = 0
end
object CheckBox17: TCheckBox
Left = 8
Top = 40
Width = 145
Height = 17
Caption = 'set hidden attribute'
TabOrder = 1
end
end
object GroupBox16: TGroupBox
Left = 268
Top = 80
Width = 161
Height = 101
Caption = 'Misc'
TabOrder = 2
object Label51: TLabel
Left = 8
Top = 16
Width = 97
Height = 13
Caption = 'Path for thumbnails:'
end
object Label52: TLabel
Left = 8
Top = 52
Width = 83
Height = 13
Caption = 'Thumbnail Prefix:'
end
object EditThumbnailPath: TEdit
Left = 16
Top = 32
Width = 129
Height = 15
Hint =
'|Is the relative path under the html save path, where thumbnails' +
' should stored.'
BorderStyle = bsNone
TabOrder = 0
Text = 'pics'
end
object EditThumbnailPrefix: TEdit
Left = 16
Top = 68
Width = 129
Height = 15
Hint = '|Each created thumbnail has this prefix (e.g. tn_flower.jpg).'
BorderStyle = bsNone
TabOrder = 1
Text = 'tn_'
end
end
object GroupBox6: TGroupBox
Left = 268
Top = 212
Width = 161
Height = 49
Caption = 'Save-Options'
Enabled = False
TabOrder = 3
Visible = False
object CheckBox2: TCheckBox
Left = 4
Top = 20
Width = 145
Height = 17
Caption = 'Save seperate HTML-files'
TabOrder = 0
end
end
end
object TabSheet2: TTabSheet
Caption = 'Search I'
object General: TGroupBox
Left = 4
Top = 0
Width = 193
Height = 261
Caption = 'General'
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 38
Width = 45
Height = 13
Caption = 'Wildcard:'
end
object Label2: TLabel
Left = 8
Top = 236
Width = 83
Height = 13
Hint = '|Searching depth in the directory structure.'
Caption = 'Searching Depth:'
ParentShowHint = False
ShowHint = True
end
object Label8: TLabel
Left = 8
Top = 168
Width = 168
Height = 39
Caption =
'Place each file in an extra line. Think about that *.* includes ' +
'all. (e.g. for ARJ files write only *.a??)'
WordWrap = True
end
object UpDown3: TUpDown
Left = 129
Top = 235
Width = 12
Height = 15
Hint = '|Searching depth in the directory structure.'
Associate = EditLevel
Min = 1
ParentShowHint = False
Position = 2
ShowHint = True
TabOrder = 2
Thousands = False
Wrap = True
end
object CheckBox1: TCheckBox
Left = 8
Top = 16
Width = 169
Height = 17
Hint = 'Search only directories on/off.'
Caption = 'Search &only Directories'
ParentShowHint = False
ShowHint = False
State = cbChecked
TabOrder = 0
OnClick = CheckBox1Click
end
object Memo3: TMemo
Left = 8
Top = 56
Width = 169
Height = 105
Hint = '|Indicates the files CD2HTML is searching for (*.* for all).'
BorderStyle = bsNone
ScrollBars = ssVertical
TabOrder = 1
end
object EditLevel: TEdit
Left = 96
Top = 235
Width = 33
Height = 15
Hint = '|Searching depth in the directory structure.'
BorderStyle = bsNone
MaxLength = 2
TabOrder = 3
Text = '2'
OnKeyUp = EditLevelKeyUp
end
end
object BtnSearchDefault: TButton
Left = 352
Top = 236
Width = 75
Height = 25
Hint = '|Reset all values to the default.'
Caption = '&Default'
TabOrder = 2
OnClick = BtnSearchDefaultClick
end
object GroupBox14: TGroupBox
Left = 204
Top = 0
Width = 225
Height = 205
Caption = 'Exclude'
TabOrder = 1
object Label13: TLabel
Left = 8
Top = 20
Width = 86
Height = 13
Caption = 'Files smaller than:'
end
object Label53: TLabel
Left = 152
Top = 20
Width = 12
Height = 13
Caption = 'KB'
end
object Bevel3: TBevel
Left = 6
Top = 40
Width = 213
Height = 6
Shape = bsBottomLine
end
object Label9: TLabel
Left = 16
Top = 52
Width = 25
Height = 13
Caption = 'Files:'
end
object Label15: TLabel
Left = 120
Top = 52
Width = 55
Height = 13
Caption = 'Directories:'
end
object Edit5: TEdit
Left = 116
Top = 19
Width = 21
Height = 15
BorderStyle = bsNone
Ctl3D = False
ParentCtl3D = False
ReadOnly = True
TabOrder = 0
Text = '10'
end
object UpDown6: TUpDown
Left = 137
Top = 19
Width = 12
Height = 15
Associate = Edit5
Min = 0
Position = 10
TabOrder = 1
Wrap = False
end
object MemoExclFiles: TMemo
Left = 12
Top = 70
Width = 100
Height = 100
ScrollBars = ssVertical
TabOrder = 2
WordWrap = False
end
object MemoExclDirs: TMemo
Left = 116
Top = 70
Width = 100
Height = 100
ScrollBars = ssVertical
TabOrder = 3
WordWrap = False
end
object CheckBox4: TCheckBox
Left = 12
Top = 180
Width = 189
Height = 17
Caption = 'Count excluded files'
State = cbChecked
TabOrder = 4
Visible = False
end
end
end
object TabSheet4: TTabSheet
Caption = 'Search II'
object GroupBox17: TGroupBox
Left = 4
Top = 4
Width = 197
Height = 261
Hint = '|'
Caption = 'Links'
TabOrder = 0
object Label6: TLabel
Left = 8
Top = 16
Width = 163
Height = 26
Caption = '(These links are only visible in the HTML-file.)'
WordWrap = True
end
object Label7: TLabel
Left = 8
Top = 160
Width = 173
Height = 52
Caption =
'Use one line for each type. Wildcards are allowed. Please note t' +
'hat for example *.htm adds *.html too.'
WordWrap = True
end
object Memo2: TMemo
Left = 8
Top = 48
Width = 177
Height = 109
Hint = '|Create links to these files.'
BorderStyle = bsNone
ScrollBars = ssVertical
TabOrder = 0
end
object BtnLinksDefault: TButton
Left = 8
Top = 228
Width = 75
Height = 25
Hint = '|Reset all values to the default.'
Caption = '&Default'
TabOrder = 1
OnClick = BtnLinksDefaultClick
end
end
object Descript2: TGroupBox
Left = 208
Top = 4
Width = 221
Height = 141
Caption = 'Description'
TabOrder = 1
object Label4: TLabel
Left = 8
Top = 18
Width = 140
Height = 13
Caption = 'Search for the following files:'
end
object Label5: TLabel
Left = 140
Top = 36
Width = 71
Height = 39
Caption = 'Place each file in an extra line.'
WordWrap = True
end
object Label19: TLabel
Left = 30
Top = 90
Width = 44
Height = 13
Hint =
'|Use the actual filename plus the indicated extension as descrip' +
'tion.'
Caption = 'filename.'
end
object CheckBoxSearch: TCheckBox
Left = 132
Top = 92
Width = 185
Height = 17
Hint = '|Search for description files like the file_id.diz.'
Caption = '&Search for description'
State = cbChecked
TabOrder = 0
Visible = False
OnClick = CheckBoxSearchClick
end
object Memo1: TMemo
Left = 12
Top = 36
Width = 121
Height = 45
Hint = '|Search for these files.'
BorderStyle = bsNone
ScrollBars = ssVertical
TabOrder = 1
WordWrap = False
end
object CheckBox9: TCheckBox
Left = 12
Top = 109
Width = 181
Height = 17
Hint = '|Remove blank lines in description files.'
Caption = 'Remove blank lines'
State = cbChecked
TabOrder = 4
end
object EditExtension: TEdit
Left = 92
Top = 89
Width = 25
Height = 15
Hint =
'|Use the actual filename plus the indicated extension as descrip' +
'tion.'
BorderStyle = bsNone
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -9
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'txt'
end
object CheckBox3: TCheckBox
Left = 12
Top = 88
Width = 17
Height = 17
Hint =
'|Use the actual filename plus the indicated extension as descrip' +
'tion.'
Caption = 'CheckBox3'
TabOrder = 2
OnClick = CheckBox3Click
end
end
object GroupBox7: TGroupBox
Left = 208
Top = 152
Width = 221
Height = 113
Caption = 'ANSI-Graphics'
TabOrder = 2
object Label21: TLabel
Left = 24
Top = 35
Width = 62
Height = 13
Hint = '|Replace with this character.'
Caption = 'replace with:'
end
object Label22: TLabel
Left = 148
Top = 35
Width = 26
Height = 13
Caption = '#46d'
end
object Label39: TLabel
Left = 144
Top = 84
Width = 12
Height = 13
Caption = '10'
end
object Label40: TLabel
Left = 172
Top = 84
Width = 35
Height = 13
Caption = 'letters.'
end
object CheckBox6: TCheckBox
Left = 8
Top = 15
Width = 201
Height = 17
Hint = '|Replace ANSI graphics with the following character.'
Caption = 'Replace ANSI-Characters'
TabOrder = 0
OnClick = CheckBox6Click
end
object Edit6: TEdit
Left = 100
Top = 34
Width = 25
Height = 15
Hint = '|Replace with this character.'
BorderStyle = bsNone
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = '.'
OnKeyPress = Edit6KeyPress
end
object UpDown4: TUpDown
Left = 124
Top = 34
Width = 12
Height = 16
Hint = '|Replace with this character.'
Min = 0
Max = 255
Position = 46
TabOrder = 2
Wrap = False
OnClick = UpDown
end
object CheckBox8: TCheckBox
Left = 8
Top = 62
Width = 185
Height = 17
Hint = '|Delete ANSI graphics.'
Caption = 'Delete ANSI-Characters'
State = cbChecked
TabOrder = 3
OnClick = CheckBox8Click
end
object RemoveNoLetter: TCheckBox
Left = 8
Top = 83
Width = 133
Height = 17
Hint =
'|If you switch this on, the lines in descriptions must have at l' +
'east xx letters ('#39'a'#39'..'#39'z'#39', '#39'A'#39'..'#39'Z'#39').'
Caption = 'Remove with less than'
TabOrder = 4
end
object UpDown2: TUpDown
Left = 160
Top = 82
Width = 9
Height = 16
Min = 1
Max = 99
Position = 1
TabOrder = 5
Wrap = True
OnClick = UpDown2Click
end
end
end
object TabSheet7: TTabSheet
Caption = 'HTML'
object Label27: TLabel
Left = 24
Top = 230
Width = 64
Height = 13
Caption = 'HTML-Colors:'
end
object Label28: TLabel
Left = 112
Top = 230
Width = 37
Height = 13
Caption = 'Layout:'
end
object ShapeColorSample: TShape
Left = 4
Top = 248
Width = 15
Height = 15
end
object BtnSave: TButton
Left = 252
Top = 227
Width = 90
Height = 20
Hint = '|Save the actual layout.'
Caption = '&Save'
TabOrder = 3
OnClick = BtnSaveClick
end
object EditColorSample: TEdit
Left = 23
Top = 248
Width = 66
Height = 15
Hint = '|Browse for a HTML color.'
BorderStyle = bsNone
MaxLength = 7
ReadOnly = True
TabOrder = 1
Text = '#000000'
end
object BtnColorBrowse: TButton
Left = 89
Top = 248
Width = 15
Height = 16
Hint = '|Browse for a HTML color.'
Caption = '...'
TabOrder = 0
OnClick = BtnColorBrowseClick
end
object LayoutList: TComboBox
Left = 112
Top = 245
Width = 137
Height = 21
Hint = '|Browse for a predefined layout.'
Style = csDropDownList
ItemHeight = 0
Sorted = True
TabOrder = 2
OnChange = LayoutListChange
end
object BtnDelete: TButton
Left = 344
Top = 248
Width = 90
Height = 20
Hint = '|Delete the actual layout.'
Caption = '&Delete'
TabOrder = 6
OnClick = BtnDeleteClick
end
object BtnNew: TButton
Left = 344
Top = 227
Width = 90
Height = 20
Hint = '|Create an empty layout.'
Caption = '&New'
TabOrder = 5
OnClick = BtnNewClick
end
object BtnSaveAs: TButton
Left = 252
Top = 248
Width = 90
Height = 20
Hint = '|Save the actual layout and choose another name.'
Caption = 'Save &As'
TabOrder = 4
OnClick = BtnSaveAsClick
end
object HTMLEdit: TMemo
Left = 0
Top = 0
Width = 433
Height = 225
Cursor = crIBeam
BorderStyle = bsNone
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
ScrollBars = ssBoth
TabOrder = 7
WantTabs = True
end
end
object TabSheet3: TTabSheet
Caption = 'Image'
object Bevel1: TBevel
Left = 40
Top = 48
Width = 150
Height = 150
end
object PaintBox2: TPaintBox
Left = 41
Top = 49
Width = 148
Height = 148
Hint = '|The thumbnails will be created in this size.'
Color = 14739424
ParentColor = False
OnPaint = PaintBox2Paint
end
object Label29: TLabel
Left = 128
Top = 208
Width = 25
Height = 13
Caption = 'y-res'
end
object Label30: TLabel
Left = 80
Top = 208
Width = 25
Height = 13
Caption = 'x-res'
end
object Label31: TLabel
Left = 113
Top = 208
Width = 6
Height = 13
Caption = 'x'
end
object Label34: TLabel
Left = 6
Top = 224
Width = 60
Height = 13
Caption = 'BorderWidth'
end
object TrackBar1: TTrackBar
Left = 40
Top = 8
Width = 150
Height = 33
Hint = '|The with of the thumbnails.'
Max = 140
Min = 20
Orientation = trHorizontal
Frequency = 10
Position = 32
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = TrackBar1Change
end
object TrackBar2: TTrackBar
Left = 0
Top = 48
Width = 33
Height = 150
Hint = '|The height of the thumbnails.'
Max = 140
Min = 20
Orientation = trVertical
Frequency = 10
Position = 32
SelEnd = 0
SelStart = 0
TabOrder = 1
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = TrackBar2Change
end
object TrackBar3: TTrackBar
Left = 72
Top = 224
Width = 86
Height = 17
Hint = '|The border width of the thumbnails.'
Max = 14
Min = 4
Orientation = trHorizontal
Frequency = 1
Position = 4
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = PaintBox2Paint
end
object GroupBox1: TGroupBox
Left = 208
Top = 8
Width = 217
Height = 145
Caption = 'JPEG-Options'
TabOrder = 5
object Label35: TLabel
Left = 8
Top = 20
Width = 61
Height = 13
Caption = 'Performance'
end
object Label36: TLabel
Left = 8
Top = 76
Width = 99
Height = 13
Caption = 'Compression-Quality'
end
object Label37: TLabel
Left = 8
Top = 48
Width = 39
Height = 13
Caption = 'Reading'
end
object ComboBox1: TComboBox
Left = 112
Top = 16
Width = 90
Height = 21
Hint =
'|The speed CD2HTML is loading the images (lower speed for better' +
' quality).'
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'BestQuality'
'BestSpeed')
TabOrder = 0
end
object CheckBox5: TCheckBox
Left = 8
Top = 120
Width = 201
Height = 17
Hint = '|Create grayscaled images.'
Caption = 'Grayscale-Palette'
TabOrder = 5
end
object CheckBox10: TCheckBox
Left = 8
Top = 96
Width = 193
Height = 17
Hint = '|Save the images as progressive JPEG.'
Caption = 'Progressive-Encoding'
TabOrder = 4
end
object EditCompression: TEdit
Left = 147
Top = 76
Width = 41
Height = 15
Hint = '|Bigger values for better image quality.'
BorderStyle = bsNone
ReadOnly = True
TabOrder = 2
Text = '80'
end
object UpDown1: TUpDown
Left = 188
Top = 76
Width = 12
Height = 15
Hint = '|Bigger values for better image quality.'
Associate = EditCompression
Min = 0
Position = 80
TabOrder = 3
TabStop = True
Wrap = False
end
object ComboBox2: TComboBox
Left = 112
Top = 44
Width = 90
Height = 21
Hint = '|Define the reading speed (better speed for lower quality).'
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'FullSize'
'Half'
'Quarter'
'Eighth')
TabOrder = 1
end
end
object GroupBox8: TGroupBox
Left = 208
Top = 160
Width = 217
Height = 105
Caption = 'GIF-Options'
TabOrder = 6
object Label38: TLabel
Left = 32
Top = 82
Width = 87
Height = 13
Caption = 'Transparent Color'
end
object CheckBox11: TCheckBox
Left = 8
Top = 16
Width = 201
Height = 17
Hint = '|Create interlaced GIF'#39's.'
Caption = 'Interlaced'
TabOrder = 0
end
object CheckBox12: TCheckBox
Left = 8
Top = 40
Width = 161
Height = 17
Hint = '|Create transparent GIF'#39's.'
Caption = 'Transparent'
TabOrder = 1
end
object Edit3: TEdit
Left = 136
Top = 82
Width = 33
Height = 15
Hint = '|Palette index for the transparent color.'
BorderStyle = bsNone
TabOrder = 2
Text = '0'
end
object CheckBox13: TCheckBox
Left = 32
Top = 60
Width = 177
Height = 17
Caption = 'Use upper left corner'
TabOrder = 3
OnClick = CheckBox13Click
end
end
object CheckBox14: TCheckBox
Left = 6
Top = 248
Width = 91
Height = 17
Hint = '|Switch the image-border off.'
Caption = 'Border Off'
TabOrder = 3
OnClick = PaintBox2Paint
end
object CheckBox15: TCheckBox
Left = 96
Top = 248
Width = 105
Height = 17
Hint = '|Switch to transparent background'
Caption = 'Background Off'
TabOrder = 4
OnClick = CheckBox15Click
end
end
object TabSheet5: TTabSheet
Caption = 'Others'
object GroupBox9: TGroupBox
Left = 8
Top = 8
Width = 209
Height = 105
Caption = 'Registration'
TabOrder = 0
object BtnRegister1: TButton
Left = 8
Top = 24
Width = 193
Height = 25
Hint =
'|Register c2h-files (to open with a double click in the explorer' +
').'
Caption = '&Register CD2HTML Document'
TabOrder = 0
OnClick = BtnRegister1Click
end
object BtnUnRegister1: TButton
Left = 8
Top = 64
Width = 193
Height = 25
Hint = '|Unregister c2h-files (before deinstalling CD2HTML).'
Caption = '&Unregister CD2HTML Document'
TabOrder = 1
OnClick = BtnUnRegister1Click
end
end
object GroupBox10: TGroupBox
Left = 224
Top = 8
Width = 185
Height = 105
Caption = 'Language'
TabOrder = 1
object ComboBox3: TComboBox
Left = 16
Top = 66
Width = 145
Height = 21
Hint = '|Change the language of all dialogs and menus'
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'Deutsch'
'English'
'Fran�ais'
'Italiano'
'Nederlands'
'Polski'
'Portuguese'
'Espanol'
'Svenska')
TabOrder = 0
OnChange = ComboBox3Change
end
object CheckBoxLanguage: TCheckBox
Left = 16
Top = 28
Width = 97
Height = 17
Caption = 'Auto'
TabOrder = 1
OnClick = ComboBox3Change
end
end
object GroupBox12: TGroupBox
Left = 8
Top = 120
Width = 209
Height = 145
Caption = 'HTML-Preview'
TabOrder = 2
object SpeedButton6: TSpeedButton
Left = 172
Top = 88
Width = 21
Height = 21
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000007B
7B007394AD0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222222222222222200000000000222220011111111102222030111111111
0222043011111111102203430111111111020434300000000000034343434302
2222043434343402222203430000000222222000222222220002222222222222
2002222222220222020222222222200022222222222222222222}
OnClick = SpeedButton6Click
end
object Label46: TLabel
Left = 8
Top = 72
Width = 43
Height = 13
Caption = 'Browser:'
end
object Edit9: TEdit
Left = 8
Top = 88
Width = 162
Height = 21
Hint = '|Indicate another browser here.'
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object RadioButton2: TRadioButton
Left = 16
Top = 24
Width = 185
Height = 17
Caption = 'Standard-System-Browser'
Checked = True
TabOrder = 1
TabStop = True
end
object RadioButton3: TRadioButton
Left = 16
Top = 48
Width = 185
Height = 17
Caption = 'Other Browser'
TabOrder = 2
end
end
end
end
object ColorDialog1: TColorDialog
Ctl3D = True
Left = 80
Top = 320
end
object OpenDialog1: TOpenDialog
Filter = 'All images|*.jpg;*.gif;*.png'
Options = [ofPathMustExist, ofFileMustExist]
Title = 'Browse for an image'
Left = 108
Top = 320
end
end