home *** CD-ROM | disk | FTP | other *** search
- object imageSourceframe: TimageSourceframe
- Left = 0
- Top = 0
- Width = 325
- Height = 330
- TabOrder = 0
- object pagecontrol1: TPageControl
- Left = 0
- Top = 0
- Width = 325
- Height = 330
- ActivePage = catalogtab
- Align = alClient
- HotTrack = True
- TabOrder = 0
- object catalogtab: TTabSheet
- Hint = 'Here you can create a catalog of the images you want to take.'
- Caption = 'Catalog'
- object Panel1: TPanel
- Left = 0
- Top = 172
- Width = 317
- Height = 130
- Align = alBottom
- TabOrder = 0
- object Button8: TButton
- Left = 152
- Top = 4
- Width = 73
- Height = 17
- Caption = 'Delete All'
- TabOrder = 2
- OnClick = ButtonClick
- end
- object Button7: TButton
- Left = 88
- Top = 4
- Width = 57
- Height = 17
- Caption = 'Delete'
- TabOrder = 1
- OnClick = ButtonClick
- end
- object Button6: TButton
- Left = 8
- Top = 4
- Width = 73
- Height = 17
- Caption = 'Add'
- TabOrder = 0
- OnClick = ButtonClick
- end
- inline sortframe2: Tsortframe
- Left = 8
- Top = 48
- TabOrder = 5
- end
- object Button1: TButton
- Left = 8
- Top = 24
- Width = 81
- Height = 17
- Caption = 'Load Catalog'
- TabOrder = 3
- OnClick = ButtonClick
- end
- object Button2: TButton
- Left = 104
- Top = 24
- Width = 97
- Height = 17
- Caption = 'Save Catalog'
- TabOrder = 4
- OnClick = ButtonClick
- end
- end
- inline catalogframe1: Tcatalogframe
- Width = 317
- Height = 172
- Align = alClient
- TabOrder = 1
- inherited DrawGrid1: TRxDrawGrid
- Width = 317
- Height = 172
- end
- end
- end
- object directorytab: TTabSheet
- Hint =
- 'Here you can choose a folder '#13#10'in which the images should be pl' +
- 'aced. '#13#10'This way you don�t have to add files if new files are p' +
- 'laced into the folder.'
- Caption = 'Folder'
- ImageIndex = 1
- object SpeedButton1: TSpeedButton
- Left = 4
- Top = 72
- Width = 65
- Height = 17
- AllowAllUp = True
- GroupIndex = 1
- Caption = 'Advanced'
- OnClick = updateenabled
- end
- object tgrafikformat1: tgrafikformat
- Left = 4
- Top = 176
- Width = 233
- Height = 125
- Caption = 'Show The Following Types'
- TabOrder = 0
- Kind = loadablegrafik
- ImageInfoset = []
- FileFormatset = []
- end
- object GroupBox7: TGroupBox
- Left = 4
- Top = 8
- Width = 233
- Height = 57
- Caption = 'Folder'
- TabOrder = 1
- object DirectoryEdit1: TDirectoryEdit
- Left = 16
- Top = 15
- Width = 209
- Height = 18
- OnAfterDialog = DirectoryEdit1AfterDialog
- DialogKind = dkWin32
- NumGlyphs = 1
- TabOrder = 0
- end
- object CheckBox6: TCheckBox
- Left = 56
- Top = 36
- Width = 169
- Height = 17
- Caption = 'Include Subfolders'
- TabOrder = 1
- end
- end
- inline sortframe1: Tsortframe
- Left = 12
- Top = 96
- TabOrder = 2
- end
- end
- object openedtab: TTabSheet
- Hint = 'All currently opened images will be chosen.'
- Caption = 'Opened Images'
- ImageIndex = 3
- object Label1: TmyRxLabel
- Left = 8
- Top = 8
- Width = 80
- Height = 13
- Caption = 'No Parameters'
- ShadowSize = 0
- end
- end
- object scannertab: TTabSheet
- Hint = 'Images come from Scanner.'
- Caption = 'Scanner'
- ImageIndex = 3
- object Label2: TmyRxLabel
- Left = 8
- Top = 8
- Width = 80
- Height = 13
- Caption = 'No Parameters'
- ShadowSize = 0
- end
- end
- end
- object tformstorage11: tformstorage1
- IniFileName = '\software\PicMaster\storage'
- Options = []
- UseRegistry = True
- OnSavePlacement = tformstorage11SavePlacement
- OnRestorePlacement = tformstorage11RestorePlacement
- StoredProps.Strings = (
- 'DirectoryEdit1.Text'
- 'CheckBox6.Checked'
- 'SpeedButton1.Down'
- 'tgrafikformat1.FileFormatset'
- 'pagecontrol1.ActivePage')
- StoredValues = <>
- AllwaysSave = True
- Left = 260
- Top = 292
- end
- end
-