main.~dfm

台湾义统公司ET21X130D摄像头

object frmMian: TfrmMian
  Left = 215
  Top = 105
  Width = 714
  Height = 476
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Et21x130 Raw Data Diaplay & Access I2C'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Courier New'
  Font.Style = []
  Menu = mnuOption
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object stbState: TStatusBar
    Left = 0
    Top = 412
    Width = 706
    Height = 18
    Panels = <
      item
        Width = 150
      end
      item
        Width = 150
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object pnlSensorImg: TPanel
    Left = 8
    Top = 8
    Width = 320
    Height = 240
    Caption = 'ET21x130 RawData'
    TabOrder = 1
    object imgSensorImg: TImage
      Left = 1
      Top = 1
      Width = 318
      Height = 238
      Align = alClient
      Stretch = True
      OnMouseMove = imgSensorImgMouseMove
    end
  end
  object btnSavePic: TButton
    Left = 8
    Top = 256
    Width = 321
    Height = 25
    Caption = 'Save Pic to BMP File'
    TabOrder = 2
    OnClick = btnSavePicClick
  end
  object btnSetGetI2C: TButton
    Left = 512
    Top = 368
    Width = 105
    Height = 41
    Caption = '&Set I2C Reg'
    TabOrder = 3
    OnClick = btnSetGetI2CClick
  end
  object gbxI2CTable: TGroupBox
    Left = 336
    Top = 1
    Width = 361
    Height = 353
    Caption = 'I2C Register'
    TabOrder = 4
    object sgrdI2CTable: TStringGrid
      Left = 6
      Top = 17
      Width = 348
      Height = 329
      ColCount = 4
      FixedCols = 2
      RowCount = 13
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
      TabOrder = 0
      RowHeights = (
        24
        24
        24
        24
        24
        24
        24
        24
        24
        24
        24
        24
        24)
    end
  end
  object btnGetOnePic: TButton
    Left = 200
    Top = 296
    Width = 129
    Height = 41
    Caption = '&Get One Pic'
    TabOrder = 5
    OnClick = btnGetOnePicClick
  end
  object rgAccessI2CMode: TRadioGroup
    Left = 336
    Top = 360
    Width = 169
    Height = 49
    Caption = 'Access I2C Register'
    Columns = 2
    ItemIndex = 0
    Items.Strings = (
      'Set I2C '
      'Get I2C')
    TabOrder = 6
    OnClick = rgAccessI2CModeClick
  end
  object rgDisplayDirect: TRadioGroup
    Left = 8
    Top = 288
    Width = 185
    Height = 49
    Caption = 'Display Direction'
    Columns = 2
    ItemIndex = 0
    Items.Strings = (
      '&L->R'
      'L<-&R')
    TabOrder = 7
  end
  object btnI2CDefault: TButton
    Left = 616
    Top = 368
    Width = 81
    Height = 41
    Caption = '&Default'
    TabOrder = 8
    OnClick = btnI2CDefaultClick
  end
  object Memo1: TMemo
    Left = 8
    Top = 344
    Width = 321
    Height = 65
    ImeName = #20013#25991' ('#32321#39636') - '#26032#27880#38899
    ScrollBars = ssVertical
    TabOrder = 9
  end
  object mnuOption: TMainMenu
    Left = 56
    Top = 24
    object Connect1: TMenuItem
      Caption = 'Connect'
      object Device1: TMenuItem
        Caption = 'Connect Device'
        OnClick = Device1Click
      end
      object Start1: TMenuItem
        Caption = 'Start'
        OnClick = Start1Click
      end
      object Stop1: TMenuItem
        Caption = 'Stop'
        OnClick = Stop1Click
      end
    end
  end
  object tmrFrameCounter: TTimer
    Enabled = False
    OnTimer = tmrFrameCounterTimer
    Left = 24
    Top = 24
  end
end