home *** CD-ROM | disk | FTP | other *** search
- object options: Toptions
- Left = 603
- Top = 249
- BorderStyle = bsDialog
- Caption = 'Options'
- ClientHeight = 278
- ClientWidth = 408
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object RxSplitter1: TRxSplitter
- Left = 8
- Top = 240
- Width = 393
- Height = 2
- BevelInner = bvLowered
- BevelOuter = bvNone
- Enabled = False
- end
- object Button1: TButton
- Left = 192
- Top = 248
- Width = 100
- Height = 25
- Caption = 'OK'
- ModalResult = 1
- TabOrder = 1
- end
- object Button2: TButton
- Left = 296
- Top = 248
- Width = 100
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 2
- end
- object PageControl1: TPageControl
- Left = 8
- Top = 8
- Width = 393
- Height = 225
- ActivePage = TabSheet1
- TabOrder = 3
- object TabSheet1: TTabSheet
- Caption = 'Thumbnails'
- object Label1: TLabel
- Left = 8
- Top = 12
- Width = 23
- Height = 13
- Caption = 'Size:'
- end
- object Label2: TLabel
- Left = 8
- Top = 40
- Width = 24
- Height = 13
- Caption = 'Font:'
- end
- object combothumbsize: TComboBox
- Left = 72
- Top = 8
- Width = 305
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- Items.Strings = (
- 'Tiny (30 x 30 pixels)'
- 'Small (50 x 50 pixels)'
- 'Normal (100 x 100 pixels)'
- 'Large (150 x 150 pixels)'
- 'XL (200 x 200 pixels)')
- end
- object Combofontsize: TComboBox
- Left = 72
- Top = 40
- Width = 305
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 1
- Items.Strings = (
- 'Tiny (6 points)'
- 'Small (7 points)'
- 'Normal (8 points)'
- 'Large (10 points)'
- 'XL (12 points)'
- 'XXL (14 points)'
- ''
- '')
- end
- object CheckBox1: TCheckBox
- Left = 9
- Top = 72
- Width = 337
- Height = 17
- Caption = 'Save thumbnails to disk for faster album access'
- TabOrder = 2
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Album Settings'
- ImageIndex = 1
- object Label4: TLabel
- Left = 8
- Top = 92
- Width = 193
- Height = 13
- Caption = 'JPG Compression (0-100, 0=best quality):'
- end
- object spincompression: TRxSpinEdit
- Left = 216
- Top = 88
- Width = 57
- Height = 21
- MaxValue = 100
- Value = 100
- TabOrder = 0
- end
- object CheckBox2: TCheckBox
- Left = 8
- Top = 124
- Width = 281
- Height = 17
- Caption = 'Always keep original camera image files as backups'
- TabOrder = 1
- end
- object Button5: TButton
- Left = 288
- Top = 88
- Width = 77
- Height = 21
- Caption = 'Set to default'
- TabOrder = 2
- OnClick = Button5Click
- end
- object GroupBox1: TGroupBox
- Left = 4
- Top = 4
- Width = 373
- Height = 73
- Caption = 'Base directory of All Albums'
- TabOrder = 3
- object basedir: TAdvDirectoryEdit
- Left = 12
- Top = 20
- Width = 349
- Height = 21
- AutoFocus = False
- ErrorColor = clRed
- ErrorFontColor = clWhite
- Flat = False
- FlatLineColor = clBlack
- FlatParentColor = True
- FocusAlign = eaDefault
- FocusBorder = False
- FocusColor = clWindow
- FocusFontColor = clWindowText
- FocusLabel = False
- FocusWidthInc = 0
- ModifiedColor = clHighlight
- DisabledColor = clSilver
- ReturnIsTab = False
- LengthLimit = 0
- TabOnFullLength = False
- LabelPosition = lpLeftTop
- LabelMargin = 4
- LabelTransparent = False
- LabelAlwaysEnabled = False
- LabelFont.Charset = DEFAULT_CHARSET
- LabelFont.Color = clWindowText
- LabelFont.Height = -11
- LabelFont.Name = 'MS Sans Serif'
- LabelFont.Style = []
- Persistence.Enable = False
- Persistence.Location = plInifile
- Color = clWindow
- Enabled = True
- HintShowLargeText = False
- OleDropTarget = False
- OleDropSource = False
- TabOrder = 0
- Transparent = False
- Visible = True
- OnChange = basedirChange
- ButtonWidth = 18
- Etched = False
- Glyph.Data = {
- CE000000424DCE0000000000000076000000280000000C0000000B0000000100
- 0400000000005800000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00F00000000FFF
- 00000088888880FF00000B088888880F00000BB08888888000000BBB00000000
- 00000BBBBBBB0B0F00000BBB00000B0F0000F000BBBBBB0F0000FF0BBBBBBB0F
- 0000FF0BBB00000F0000FFF000FFFFFF0000}
- end
- object Button3: TButton
- Left = 12
- Top = 44
- Width = 349
- Height = 21
- Caption = 'Set to Default ("My Pictures" folder)'
- TabOrder = 1
- OnClick = Button3Click
- end
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'User Interface'
- ImageIndex = 2
- object GroupBox2: TGroupBox
- Left = 4
- Top = 4
- Width = 373
- Height = 69
- Caption = 'External Image Editor'
- TabOrder = 0
- object Label5: TLabel
- Left = 11
- Top = 20
- Width = 234
- Height = 13
- Caption = 'Application started by clicking the "Editor" button:'
- end
- object imageeditor: TAdvFileNameEdit
- Left = 8
- Top = 36
- Width = 353
- Height = 21
- AutoFocus = False
- ErrorColor = clRed
- ErrorFontColor = clWhite
- Flat = False
- FlatLineColor = clBlack
- FlatParentColor = True
- FocusAlign = eaDefault
- FocusBorder = False
- FocusColor = clWindow
- FocusFontColor = clWindowText
- FocusLabel = False
- FocusWidthInc = 0
- ModifiedColor = clHighlight
- DisabledColor = clSilver
- ReturnIsTab = False
- LengthLimit = 0
- TabOnFullLength = False
- LabelPosition = lpLeftTop
- LabelMargin = 4
- LabelTransparent = False
- LabelAlwaysEnabled = False
- LabelFont.Charset = DEFAULT_CHARSET
- LabelFont.Color = clWindowText
- LabelFont.Height = -11
- LabelFont.Name = 'MS Sans Serif'
- LabelFont.Style = []
- Persistence.Enable = False
- Persistence.Location = plInifile
- Color = clWindow
- Enabled = True
- HintShowLargeText = False
- OleDropTarget = False
- OleDropSource = False
- TabOrder = 0
- Transparent = False
- Visible = True
- ButtonWidth = 18
- Etched = False
- Glyph.Data = {
- CE000000424DCE0000000000000076000000280000000C0000000B0000000100
- 0400000000005800000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00D00000000DDD
- 00000077777770DD00000F077777770D00000FF07777777000000FFF00000000
- 00000FFFFFFF0DDD00000FFF00000DDD0000D000DDDDD0000000DDDDDDDDDD00
- 0000DDDDD0DDD0D00000DDDDDD000DDD0000}
- Filter = 'Application (*.exe)|*.exe'
- FilterIndex = 0
- DialogOptions = []
- DialogKind = fdOpen
- end
- end
- object GroupBox3: TGroupBox
- Left = 4
- Top = 88
- Width = 373
- Height = 105
- Caption = '"Don'#39't show me this again" Dialogs'
- TabOrder = 1
- object Label6: TLabel
- Left = 8
- Top = 20
- Width = 361
- Height = 53
- AutoSize = False
- Caption =
- 'Several dialogs offer a "Don'#39't show this dialog again" option (e' +
- '.g. when a files were moved or dumped). If you have disabled dia' +
- 'logs this way you can re-activate them again by clicking this bu' +
- 'tton.'
- WordWrap = True
- end
- object Button4: TButton
- Left = 8
- Top = 72
- Width = 329
- Height = 25
- Caption = 'Re-activate all dialogs'
- TabOrder = 0
- OnClick = Button4Click
- end
- end
- end
- object TabSheet4: TTabSheet
- Caption = 'FTP Server'
- ImageIndex = 3
- object Label3: TLabel
- Left = 8
- Top = 8
- Width = 239
- Height = 13
- Caption = 'The FTP Server used for uploading HTML-Albums:'
- end
- object GroupBox8: TGroupBox
- Left = 4
- Top = 28
- Width = 373
- Height = 77
- Caption = 'Server Data'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- object Label73: TLabel
- Left = 12
- Top = 20
- Width = 96
- Height = 13
- Caption = 'Server Name (or IP):'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label80: TLabel
- Left = 12
- Top = 44
- Width = 105
- Height = 13
- Caption = 'HTML Base Directory:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Edit1: TEdit
- Left = 125
- Top = 16
- Width = 236
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object Edit2: TEdit
- Left = 125
- Top = 42
- Width = 236
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- Text = '/'
- end
- end
- object GroupBox9: TGroupBox
- Left = 4
- Top = 108
- Width = 373
- Height = 81
- Caption = 'Account Data'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- object Label81: TLabel
- Left = 12
- Top = 24
- Width = 51
- Height = 13
- Caption = 'Username:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label82: TLabel
- Left = 12
- Top = 52
- Width = 49
- Height = 13
- Caption = 'Password:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Edit3: TEdit
- Left = 125
- Top = 20
- Width = 236
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object Edit4: TEdit
- Left = 125
- Top = 48
- Width = 140
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- PasswordChar = '*'
- TabOrder = 1
- end
- object CheckBox3: TCheckBox
- Left = 272
- Top = 52
- Width = 97
- Height = 17
- Caption = 'Save Password'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 2
- end
- end
- end
- object TabSheet5: TTabSheet
- Caption = 'File Extensions'
- ImageIndex = 4
- inline setextensions1: Tsetextensions
- Left = 8
- Top = 4
- Width = 377
- Height = 173
- inherited Label1: TLabel
- Top = 48
- Width = 257
- Height = 81
- end
- inherited Label2: TLabel
- Width = 369
- Height = 41
- end
- inherited CheckListBox1: TCheckListBox
- Top = 48
- end
- end
- end
- end
- end
-