home *** CD-ROM | disk | FTP | other *** search
- object FormExifUpdater: TFormExifUpdater
- Left = 470
- Top = 317
- AutoScroll = False
- BorderIcons = [biSystemMenu]
- Caption = 'EXIF Updater'
- ClientHeight = 301
- ClientWidth = 369
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 260
- Width = 369
- Height = 41
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 369
- 41)
- object BtnCancel: TButton
- Left = 264
- Top = 8
- Width = 75
- Height = 25
- Anchors = [akTop, akRight]
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 0
- OnClick = BtnCancelClick
- end
- object BtnGo: TButton
- Left = 176
- Top = 8
- Width = 75
- Height = 25
- Anchors = [akTop, akRight]
- Caption = 'Go'
- TabOrder = 1
- OnClick = BtnGoClick
- end
- end
- object nbUpdater: TNotebook
- Left = 0
- Top = 0
- Width = 369
- Height = 260
- Align = alClient
- TabOrder = 1
- object TPage
- Left = 0
- Top = 0
- Caption = 'pgOptions'
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 369
- Height = 260
- Align = alClient
- BevelOuter = bvNone
- Caption = 'Panel2'
- TabOrder = 0
- object Panel3: TPanel
- Left = 0
- Top = 65
- Width = 369
- Height = 195
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object Bevel1: TBevel
- Left = 0
- Top = 193
- Width = 369
- Height = 2
- Align = alBottom
- Shape = bsBottomLine
- end
- object Bevel2: TBevel
- Left = 0
- Top = 0
- Width = 369
- Height = 2
- Align = alTop
- Shape = bsTopLine
- end
- object GroupBox1: TGroupBox
- Left = 40
- Top = 97
- Width = 273
- Height = 79
- Caption = 'Options'
- TabOrder = 0
- object cbUpdateCaption: TCheckBox
- Left = 16
- Top = 37
- Width = 161
- Height = 17
- Caption = 'Update Caption in EXIF'
- Checked = True
- State = cbChecked
- TabOrder = 0
- end
- object cbUpdateDate: TCheckBox
- Left = 16
- Top = 56
- Width = 161
- Height = 17
- Caption = 'Update picture date in EXIF'
- Checked = True
- State = cbChecked
- TabOrder = 1
- end
- object cbCreateBackupFiles: TCheckBox
- Left = 16
- Top = 19
- Width = 161
- Height = 17
- Caption = 'Create backup files'
- Checked = True
- State = cbChecked
- TabOrder = 2
- end
- end
- object GroupBox2: TGroupBox
- Left = 40
- Top = 12
- Width = 273
- Height = 76
- Caption = 'Images to update'
- TabOrder = 1
- object rbAllImages: TRadioButton
- Left = 16
- Top = 17
- Width = 249
- Height = 17
- Caption = 'All images in Picture Folder'
- TabOrder = 0
- end
- object rbSelected: TRadioButton
- Left = 16
- Top = 51
- Width = 241
- Height = 17
- Caption = 'Selected images'
- Checked = True
- TabOrder = 1
- TabStop = True
- end
- object rbAllDisplayed: TRadioButton
- Left = 16
- Top = 34
- Width = 249
- Height = 17
- Caption = 'All displayed images'
- TabOrder = 2
- end
- end
- end
- object Panel5: TPanel
- Left = 0
- Top = 0
- Width = 369
- Height = 65
- Align = alTop
- BevelOuter = bvNone
- Color = clBtnHighlight
- TabOrder = 1
- object Label1: TLabel
- Left = 8
- Top = 8
- Width = 73
- Height = 13
- Caption = 'Update EXIF'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 89
- Top = 8
- Width = 221
- Height = 13
- Caption = 'This feature allows you to update the metadata'
- end
- object Label3: TLabel
- Left = 89
- Top = 24
- Width = 201
- Height = 13
- Caption = 'within your images using a lossless update.'
- end
- object Label4: TLabel
- Left = 89
- Top = 41
- Width = 220
- Height = 13
- Caption = 'Note: This may cause extra FotoSync uploads.'
- end
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'pgProgress'
- object Panel4: TPanel
- Left = 0
- Top = 49
- Width = 369
- Height = 211
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 369
- 211)
- object Bevel3: TBevel
- Left = 0
- Top = 209
- Width = 369
- Height = 2
- Align = alBottom
- Shape = bsBottomLine
- end
- object Bevel4: TBevel
- Left = 0
- Top = 0
- Width = 369
- Height = 2
- Align = alTop
- Shape = bsTopLine
- end
- object LblProgress: TLabel
- Left = 42
- Top = 54
- Width = 296
- Height = 13
- Alignment = taCenter
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption = 'Updating'
- end
- object LblProgressFname: TLabel
- Left = 13
- Top = 88
- Width = 346
- Height = 13
- Alignment = taCenter
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption = '<filename>'
- end
- object LblProgress3: TLabel
- Left = 13
- Top = 104
- Width = 346
- Height = 13
- Cursor = crHandPoint
- Alignment = taCenter
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption = 'LblProgress3'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- Visible = False
- OnClick = LblProgress3Click
- end
- object pbProgress: TProgressBar
- Left = 12
- Top = 70
- Width = 346
- Height = 16
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 0
- end
- end
- object Panel6: TPanel
- Left = 0
- Top = 0
- Width = 369
- Height = 49
- Align = alTop
- BevelOuter = bvNone
- Color = clBtnHighlight
- TabOrder = 1
- object Label5: TLabel
- Left = 16
- Top = 8
- Width = 50
- Height = 13
- Caption = 'Progress'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 80
- Top = 8
- Width = 213
- Height = 13
- Caption = 'Your images are being updated. Please wait.'
- end
- end
- end
- end
- end
-