home *** CD-ROM | disk | FTP | other *** search
- object autoform: Tautoform
- Left = 490
- Top = 189
- HelpContext = 41121
- BorderStyle = bsDialog
- Caption = 'Batch'
- ClientHeight = 436
- ClientWidth = 644
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- ShowHint = True
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- inline batchlistFrame1: TbatchlistFrame
- Left = 16
- Top = 16
- Width = 261
- Height = 197
- inherited FileListBox1: TFileListBox
- Width = 261
- Height = 158
- end
- inherited Panel2: TPanel
- Top = 158
- Width = 261
- inherited MediaPlayer1: TMediaPlayer
- Width = 29
- VisibleButtons = [btRecord]
- OnClick = batchlistFrame1MediaPlayer1Click
- end
- inherited Button3: TButton
- Visible = False
- end
- end
- end
- object GroupBox2: TGroupBox
- Left = 332
- Top = 4
- Width = 305
- Height = 393
- Hint =
- 'Select here if you want to load a picture before the batch opera' +
- 'tion.'
- Caption = 'Load Picture before'
- TabOrder = 1
- object RadioButton9: TRadioButton
- Left = 8
- Top = 24
- Width = 57
- Height = 17
- Caption = 'no'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = updateall
- end
- object RadioButton10: TRadioButton
- Left = 8
- Top = 40
- Width = 141
- Height = 17
- Caption = 'Yes, Pictures come from'
- TabOrder = 1
- OnClick = updateall
- end
- object mycombobox1: mycombobox
- Left = 164
- Top = 36
- Width = 105
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 2
- Text = 'Catalog'
- OnChange = mycombobox1Change
- Items.Strings = (
- 'Catalog'
- 'Folder'
- 'All Opened'
- 'Scanner')
- Itemindex = 0
- end
- inline imageSourceframe1: TimageSourceframe
- Left = 36
- Top = 64
- Width = 261
- Height = 325
- TabOrder = 3
- inherited pagecontrol1: TPageControl
- Width = 261
- Height = 325
- inherited catalogtab: TTabSheet
- inherited Panel1: TPanel
- Top = 167
- Width = 253
- end
- inherited catalogframe1: Tcatalogframe
- Width = 253
- Height = 167
- inherited DrawGrid1: TRxDrawGrid
- Width = 253
- Height = 167
- end
- end
- end
- end
- end
- end
- object GroupBox3: TGroupBox
- Left = 8
- Top = 228
- Width = 317
- Height = 197
- Hint = 'Select here what should follow after the batch operation.'
- Caption = 'When finished do the following'
- TabOrder = 2
- inline autosaveframe1: Tautosaveframe
- Left = 20
- Top = 100
- Width = 293
- Height = 93
- end
- object RadioButton4: TRadioButton
- Left = 8
- Top = 16
- Width = 57
- Height = 17
- Caption = 'Nothing'
- Checked = True
- TabOrder = 1
- TabStop = True
- OnClick = updateall
- end
- object RadioButton5: TRadioButton
- Left = 8
- Top = 32
- Width = 69
- Height = 17
- Caption = 'Save'
- TabOrder = 2
- OnClick = updateall
- end
- object RadioButton6: TRadioButton
- Left = 8
- Top = 80
- Width = 101
- Height = 17
- Caption = 'Into Folder:'
- TabOrder = 3
- OnClick = updateall
- end
- object RadioButton7: TRadioButton
- Left = 8
- Top = 48
- Width = 69
- Height = 17
- Caption = 'Close'
- TabOrder = 4
- OnClick = updateall
- end
- object RadioButton8: TRadioButton
- Left = 8
- Top = 64
- Width = 141
- Height = 17
- Caption = 'Save and Close'
- TabOrder = 5
- OnClick = updateall
- end
- end
- object Button11: TButton
- Left = 468
- Top = 404
- Width = 69
- Height = 25
- Caption = 'Quit'
- ModalResult = 2
- TabOrder = 3
- end
- object Button10: TButton
- Left = 376
- Top = 404
- Width = 69
- Height = 25
- Caption = 'Execute'
- ModalResult = 1
- TabOrder = 4
- end
- object Button1: TButton
- Left = 568
- Top = 404
- Width = 61
- Height = 25
- Caption = 'Help'
- TabOrder = 5
- OnClick = Button1Click
- end
- object MDIWallpaper11: TMDIWallpaper1
- TileWidth = 0
- TileHeight = 0
- dialogImage = False
- Left = 344
- Top = 400
- ClientIsOwnerForm = True
- end
- object tformstorage11: tformstorage1
- IniFileName = '\software\PicMaster\storage'
- UseRegistry = True
- OnRestorePlacement = tformstorage11RestorePlacement
- StoredProps.Strings = (
- 'mycombobox1.Itemindex'
- 'RadioButton10.Checked'
- 'RadioButton4.Checked'
- 'RadioButton5.Checked'
- 'RadioButton6.Checked'
- 'RadioButton7.Checked'
- 'RadioButton8.Checked'
- 'RadioButton9.Checked')
- StoredValues = <>
- AllwaysSave = True
- Left = 380
- Top = 404
- end
- end
-