okc21mainut.dfm

某省公路收费站违章车辆抓拍管理系统

          0000777777777777777733333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
      end
      object ListBox1: TListBox
        Left = 404
        Top = 48
        Width = 81
        Height = 27
        Hint = '???????????????'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 21
        Items.Strings = (
          '1'
          '2'
          '3'
          '4'
          '5'
          '6'
          '7'
          '8'
          '9'
          '10'
          '11'
          '12'
          '13'
          '14'
          '15'
          '16')
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnExit = ListBox1Exit
      end
    end
    object TabSht5: TTabSheet
      Caption = #35270#39057#35774#32622
      ImageIndex = 4
      object Bevel5: TBevel
        Left = 128
        Top = 15
        Width = 493
        Height = 149
      end
      object Label3: TLabel
        Left = 177
        Top = 64
        Width = 56
        Height = 16
        Caption = #23545#27604#24230':'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = '??'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 177
        Top = 128
        Width = 56
        Height = 16
        Caption = #33394'  '#24230':'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = '??'
        Font.Style = []
        ParentFont = False
      end
      object Label9: TLabel
        Left = 177
        Top = 94
        Width = 56
        Height = 16
        Caption = #39281#21644#24230':'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = '??'
        Font.Style = []
        ParentFont = False
      end
      object Label11: TLabel
        Left = 177
        Top = 32
        Width = 56
        Height = 16
        Caption = #20142'  '#24230':'
        Color = clBtnFace
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = '??'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object BrightnessTB: TTrackBar
        Left = 254
        Top = 28
        Width = 318
        Height = 27
        Max = 255
        Frequency = 10
        Position = 169
        TabOrder = 0
        OnChange = BrightnessTBChange
      end
      object ContrastTB: TTrackBar
        Left = 256
        Top = 60
        Width = 317
        Height = 27
        LineSize = 10
        Max = 255
        Frequency = 10
        Position = 236
        TabOrder = 1
        OnChange = ContrastTBChange
      end
      object HueTB: TTrackBar
        Left = 256
        Top = 125
        Width = 317
        Height = 30
        LineSize = 10
        Max = 255
        Frequency = 10
        Position = 30
        TabOrder = 2
        OnChange = HueTBChange
      end
      object SaturationTB: TTrackBar
        Left = 256
        Top = 92
        Width = 317
        Height = 27
        LineSize = 10
        Max = 255
        Frequency = 10
        Position = 198
        TabOrder = 3
        OnChange = SaturationTBChange
      end
    end
    object TabSht6: TTabSheet
      Caption = #35270#39057#28304#36873#25321
      ImageIndex = 5
      object GroupBox1: TGroupBox
        Left = 142
        Top = 24
        Width = 489
        Height = 121
        Caption = #35270#39057#28304':'
        TabOrder = 6
      end
      object RadioBtn1: TRadioButton
        Left = 184
        Top = 75
        Width = 40
        Height = 26
        Alignment = taLeftJustify
        BiDiMode = bdLeftToRight
        Caption = '1'
        Checked = True
        ParentBiDiMode = False
        TabOrder = 0
        TabStop = True
        OnClick = RadioBtn1Click
      end
      object RadioBtn2: TRadioButton
        Left = 255
        Top = 75
        Width = 40
        Height = 26
        Alignment = taLeftJustify
        BiDiMode = bdLeftToRight
        Caption = '2'
        ParentBiDiMode = False
        TabOrder = 1
        OnClick = RadioBtn1Click
      end
      object RadioBtn3: TRadioButton
        Left = 327
        Top = 75
        Width = 40
        Height = 26
        Alignment = taLeftJustify
        BiDiMode = bdLeftToRight
        Caption = '3'
        ParentBiDiMode = False
        TabOrder = 2
        TabStop = True
        OnClick = RadioBtn1Click
      end
      object RadioBtn4: TRadioButton
        Left = 399
        Top = 75
        Width = 40
        Height = 26
        Alignment = taLeftJustify
        BiDiMode = bdLeftToRight
        Caption = '4'
        ParentBiDiMode = False
        TabOrder = 3
        TabStop = True
        OnClick = RadioBtn1Click
      end
      object RadioBtn5: TRadioButton
        Left = 471
        Top = 75
        Width = 40
        Height = 26
        Alignment = taLeftJustify
        BiDiMode = bdLeftToRight
        Caption = '5'
        ParentBiDiMode = False
        TabOrder = 4
        TabStop = True
        OnClick = RadioBtn1Click
      end
      object RadioBtn6: TRadioButton
        Left = 543
        Top = 75
        Width = 40
        Height = 26
        Alignment = taLeftJustify
        BiDiMode = bdLeftToRight
        Caption = '6'
        ParentBiDiMode = False
        TabOrder = 5
        OnClick = RadioBtn1Click
      end
    end
    object TabSht7: TTabSheet
      Caption = #30828#30424#31995#32479
      ImageIndex = 6
      object HDStrGrid: TStringGrid
        Left = 176
        Top = 14
        Width = 414
        Height = 154
        ColCount = 4
        FixedCols = 0
        RowCount = 6
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
        ScrollBars = ssNone
        TabOrder = 0
        ColWidths = (
          79
          107
          110
          110)
      end
    end
    object TabSheet1: TTabSheet
      Caption = #36864#20986
      ImageIndex = 7
      object ExitBtn: TBitBtn
        Left = 583
        Top = 80
        Width = 96
        Height = 35
        BiDiMode = bdLeftToRight
        Caption = #36864#20986
        ParentBiDiMode = False
        TabOrder = 0
        OnClick = ExitBtnClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033BBBBBBBBBB
          BB33337777777777777F33BB00BBBBBBBB33337F77333333F37F33BB0BBBBBB0
          BB33337F73F33337FF7F33BBB0BBBB000B33337F37FF3377737F33BBB00BB00B
          BB33337F377F3773337F33BBBB0B00BBBB33337F337F7733337F33BBBB000BBB
          BB33337F33777F33337F33EEEE000EEEEE33337F3F777FFF337F33EE0E80000E
          EE33337F73F77773337F33EEE0800EEEEE33337F37377F33337F33EEEE000EEE
          EE33337F33777F33337F33EEEEE00EEEEE33337F33377FF3337F33EEEEEE00EE
          EE33337F333377F3337F33EEEEEE00EEEE33337F33337733337F33EEEEEEEEEE
          EE33337FFFFFFFFFFF7F33EEEEEEEEEEEE333377777777777773}
        NumGlyphs = 2
      end
    end
  end
  object Panel2: TPanel
    Left = 5
    Top = 3
    Width = 390
    Height = 296
    BevelInner = bvLowered
    BevelOuter = bvLowered
    Color = clSilver
    TabOrder = 1
    object Image1: TImage
      Left = 3
      Top = 4
      Width = 384
      Height = 288
    end
  end
  object Animate1: TAnimate
    Left = 219
    Top = 234
    Width = 358
    Height = 60
    AutoSize = False
    CommonAVI = aviCopyFiles
    StopFrame = 34
    Visible = False
  end
  object QuestionTb: TTable
    DatabaseName = 'c:\sys'
    FieldDefs = <
      item
        Name = #25991#20214#21517
        DataType = ftString
        Size = 8
      end
      item
        Name = #25910#36153#21592#22995#21517
        DataType = ftString
        Size = 8
      end
      item
        Name = #25910#36153#21592#32534#21495
        DataType = ftString
        Size = 4
      end
      item
        Name = #24180
        DataType = ftString
        Size = 4
      end
      item
        Name = #26376
        DataType = ftString
        Size = 2
      end
      item
        Name = #26085
        DataType = ftString
        Size = 2
      end
      item
        Name = #26102
        DataType = ftString
        Size = 2
      end
      item
        Name = #20998
        DataType = ftString
        Size = 2
      end
      item
        Name = #31186
        DataType = ftString
        Size = 2
      end
      item
        Name = #36710#36947
        DataType = ftString
        Size = 2
      end
      item
        Name = #26426#21028#36710#22411
        DataType = ftString
        Size = 2
      end
      item
        Name = #20154#21028#36710#22411
        DataType = ftString
        Size = 2
      end
      item
        Name = #26426#21028#37329#39069
        DataType = ftString
        Size = 3
      end
      item
        Name = #23454#25910#37329#39069
        DataType = ftString
        Size = 3
      end
      item
        Name = #24037#29677
        DataType = ftString
        Size = 2
      end
      item
        Name = #38382#39064#31867#21035
        DataType = ftString
        Size = 2
      end>
    StoreDefs = True
    TableName = '20030405.dbf'
    Left = 426
    Top = 56
    object QuestionTbBDEDesigner: TStringField
      FieldName = #25991#20214#21517
      Size = 8
    end
    object QuestionTbBDEDesigner2: TStringField
      FieldName = #25910#36153#21592#22995#21517
      Size = 8
    end
    object QuestionTbBDEDesigner3: TStringField
      FieldName = #25910#36153#21592#32534#21495
      Size = 4
    end
    object QuestionTbBDEDesigner4: TStringField
      FieldName = #24180
      Size = 4
    end
    object QuestionTbBDEDesigner5: TStringField
      FieldName = #26376
      Size = 2
    end
    object QuestionTbBDEDesigner6: TStringField
      FieldName = #26085
      Size = 2
    end
    object QuestionTbBDEDesigner7: TStringField
      FieldName = #26102
      Size = 2
    end
    object QuestionTbBDEDesigner8: TStringField
      FieldName = #20998
      Size = 2
    end
    object QuestionTbBDEDesigner9: TStringField
      FieldName = #31186
      Size = 2
    end
    object QuestionTbBDEDesigner10: TStringField
      FieldName = #36710#36947
      Size = 2
    end
    object QuestionTbBDEDesigner11: TStringField
      FieldName = #26426#21028#36710#22411
      Size = 2
    end
    object QuestionTbBDEDesigner12: TStringField
      FieldName = #20154#21028#36710#22411
      Size = 2
    end
    object QuestionTbBDEDesigner13: TStringField
      FieldName = #26426#21028#37329#39069
      Size = 3
    end
    object QuestionTbBDEDesigner14: TStringField
      FieldName = #23454#25910#37329#39069
      Size = 3
    end
    object QuestionTbBDEDesigner15: TStringField
      FieldName = #24037#29677
      Size = 2
    end
    object QuestionTbBDEDesigner16: TStringField
      FieldName = #38382#39064#31867#21035
      Size = 2
    end
  end
  object Timer2: TTimer
    Enabled = False
    Interval = 1800000
    OnTimer = Timer2Timer
    Left = 73
    Top = 55
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 9000
    OnTimer = Timer1Timer
    Left = 27
    Top = 55
  end
  object Timer3: TTimer
    Enabled = False
    Interval = 6000
    OnTimer = Timer3Timer
    Left = 119
    Top = 55
  end
  object BatchMove: TBatchMove
    Destination = FeeTab
    Mode = batUpdate
    Source = ServerTab
    Left = 426
    Top = 134
  end
  object FeeTab: TTable
    DatabaseName = 'c:\sys'
    IndexName = 'VEHICLEID'
    MasterFields = #26426#21028#36710#22411
    MasterSource = QuestionDS
    TableName = 'VF.DBF'
    Left = 476
    Top = 56
  end
  object TollorTab: TTable
    DatabaseName = 'C:\sys'
    IndexName = 'USERID'
    MasterFields = #25910#36153#21592#32534#21495
    MasterSource = QuestionDS
    TableName = 'SC.DBF'
    Left = 526
    Top = 56
  end
  object ServerTab: TTable
    DatabaseName = 'hntzShi'
    SessionName = 'Default'
    TableName = 'dbo.SC'
    Left = 576
    Top = 56
  end
  object QuestionDS: TDataSource
    DataSet = QuestionTb
    Left = 426
    Top = 95
  end
  object DatabaseServer: TDatabase
    AliasName = 'HNTG_SQL'
    DatabaseName = 'hntzShi'
    LoginPrompt = False
    SessionName = 'Default'
    Left = 426
    Top = 18
  end
  object Commqry: TQuery
    DatabaseName = 'hntzShi'
    Left = 626
    Top = 56
  end
  object FmtTimer: TTimer
    Enabled = False
    Interval = 300
    OnTimer = FmtTimerTimer
    Left = 165
    Top = 55
  end
end