BSOne.SFC/EM.Lib/ImageEn_SRC/Demos/ImageAcquisition/CameraGetImages/umain.dfm

object MainForm: TMainForm
  Left = 204
  Top = 60
  Caption = 'WIA Camera Acquisition Demo - www.ImageEn.com'
  ClientHeight = 666
  ClientWidth = 936
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = True
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 661
    Top = 0
    Height = 649
    Align = alRight
    Beveled = True
  end
  object ImageEnView1: TImageEnView
    Left = 0
    Top = 0
    Width = 661
    Height = 649
    Background = clBtnFace
    BorderStyle = bsNone
    AutoFit = True
    OnProgress = ImageEnView1Progress
    EnableInteractionHints = True
    Align = alClient
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 664
    Top = 0
    Width = 272
    Height = 649
    Align = alRight
    BevelOuter = bvNone
    TabOrder = 1
    object Label1: TLabel
      Left = 12
      Top = 3
      Width = 100
      Height = 13
      Caption = 'Camera Directory'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 12
      Top = 524
      Width = 75
      Height = 13
      Caption = 'EXIF Samples'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label11: TLabel
      Left = 12
      Top = 404
      Width = 59
      Height = 13
      Caption = 'Thumbnail'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object TreeView1: TTreeView
      Left = 12
      Top = 20
      Width = 246
      Height = 321
      Anchors = [akLeft, akTop, akRight]
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Indent = 19
      ParentFont = False
      TabOrder = 0
      OnChange = TreeView1Change
    end
    object Panel2: TPanel
      Left = 12
      Top = 541
      Width = 241
      Height = 89
      BevelKind = bkFlat
      BevelOuter = bvNone
      TabOrder = 1
      object lblMake: TLabel
        Left = 8
        Top = 8
        Width = 29
        Height = 13
        Caption = 'Make:'
      end
      object Label4: TLabel
        Left = 48
        Top = 8
        Width = 20
        Height = 13
        Caption = 'n.a.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblModel: TLabel
        Left = 8
        Top = 24
        Width = 32
        Height = 13
        Caption = 'Model:'
      end
      object Label6: TLabel
        Left = 48
        Top = 24
        Width = 20
        Height = 13
        Caption = 'n.a.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblDate: TLabel
        Left = 8
        Top = 40
        Width = 27
        Height = 13
        Caption = 'Date:'
      end
      object Label8: TLabel
        Left = 48
        Top = 40
        Width = 20
        Height = 13
        Caption = 'n.a.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblSize: TLabel
        Left = 8
        Top = 56
        Width = 23
        Height = 13
        Caption = 'Size:'
      end
      object Label10: TLabel
        Left = 48
        Top = 56
        Width = 20
        Height = 13
        Caption = 'n.a.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
    object chkSaveToDisk: TCheckBox
      Left = 20
      Top = 346
      Width = 130
      Height = 17
      Caption = 'Save image to disk'
      TabOrder = 2
    end
    object chkLoadImage: TCheckBox
      Left = 20
      Top = 367
      Width = 99
      Height = 17
      Caption = 'Load Image'
      TabOrder = 3
    end
    object ImageEnView2: TImageEnView
      Left = 12
      Top = 420
      Width = 105
      Height = 89
      Background = clBtnFace
      AutoFit = True
      EnableInteractionHints = True
      TabOrder = 4
    end
    object Button1: TButton
      Left = 183
      Top = 346
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = 'Delete Image'
      TabOrder = 5
      OnClick = Button1Click
    end
  end
  object ProgressBar1: TProgressBar
    Left = 0
    Top = 649
    Width = 936
    Height = 17
    Align = alBottom
    TabOrder = 2
  end
  object MainMenu1: TMainMenu
    Left = 106
    Top = 106
    object File1: TMenuItem
      Caption = 'File'
      object Save1: TMenuItem
        Caption = '&Save loaded image...'
        OnClick = Save1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Print1: TMenuItem
        Caption = '&Print...'
        OnClick = Print1Click
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = '&Exit'
        OnClick = Exit1Click
      end
    end
    object SelectCamera1: TMenuItem
      Caption = 'Select Camera'
      OnClick = SelectCamera1Click
    end
  end
end