waterctrl.~dfm

delphi+access,水位控制系统

        XValues.DateTime = False
        XValues.Name = 'X'
        XValues.Multiplier = 1.000000000000000000
        XValues.Order = loAscending
        YValues.DateTime = False
        YValues.Name = 'Y'
        YValues.Multiplier = 1.000000000000000000
        YValues.Order = loNone
      end
    end
  end
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 470
    Height = 30
    Bands = <
      item
        Control = ToolBar1
        ImageIndex = -1
        MinHeight = 26
        Width = 466
      end>
    object ToolBar1: TToolBar
      Left = 9
      Top = 0
      Width = 453
      Height = 26
      Caption = 'ToolBar1'
      TabOrder = 0
      object BTN_Setting: TButton
        Left = 0
        Top = 2
        Width = 73
        Height = 22
        Hint = #35774#32622#23454#39564#21442#25968
        Action = Action_Setting
        Caption = #21442#25968#35774#32622'(&P)'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object BTN_Begin: TButton
        Left = 73
        Top = 2
        Width = 48
        Height = 22
        Hint = #23454#39564#24320#22987
        Action = Action_Start
        Caption = #24320#22987'(&B)'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object BRN_Stop: TButton
        Left = 121
        Top = 2
        Width = 48
        Height = 22
        Hint = #32456#27490#23454#39564
        Action = Action_Stop
        Caption = #20572#27490'(&S)'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object BTN_Redo: TButton
        Left = 169
        Top = 2
        Width = 48
        Height = 22
        Hint = #23454#39564#37325#25918'/'#26242#20572
        Action = Action_ReDo
        Caption = #37325#25918'(&R)'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
      end
      object BTN_DataView: TButton
        Left = 217
        Top = 2
        Width = 56
        Height = 22
        Hint = #23454#39564#25968#25454#27983#35272
        Action = Action_DataView
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
      end
      object BTN_DataClear: TButton
        Left = 273
        Top = 2
        Width = 56
        Height = 22
        Hint = #28165#38500#24403#21069#25968#25454
        Action = Action_Clear
        ParentShowHint = False
        ShowHint = True
        TabOrder = 7
      end
      object BTN_About: TButton
        Left = 329
        Top = 2
        Width = 48
        Height = 22
        Hint = #29256#26435#20449#24687
        Action = Action_About
        Caption = #20851#20110'(&A)'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
      end
      object BTN_Help: TButton
        Left = 377
        Top = 2
        Width = 48
        Height = 22
        Hint = #24110#21161
        Action = Action_Help
        Caption = #24110#21161'(&H)'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
      end
    end
  end
  object MainMenu1: TMainMenu
    Left = 128
    Top = 80
    object MenuFile: TMenuItem
      Caption = #25991#20214'(&F)'
      object Menu_Open: TMenuItem
        Caption = #25171#24320#20197#21069#32467#26524'(&O)...'
        OnClick = Menu_OpenClick
      end
      object Menu_SaveAs: TMenuItem
        Caption = #21478#23384#23454#39564#32467#26524'(&S)...'
        OnClick = Menu_SaveAsClick
      end
      object Menu_Clear: TMenuItem
        Action = Action_Clear
        Caption = #23454#39564#32467#26524#28165#38500'(&C)...'
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Menu_ChartSave: TMenuItem
        Caption = #20445#23384#23454#39564#26354#32447'(&P)...'
        OnClick = Menu_ChartSaveClick
      end
      object Menu_PrintSetup: TMenuItem
        Caption = #25171#21360#35774#32622'(&T)...'
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Menu_Exit: TMenuItem
        Action = Action_Exit
      end
    end
    object MenuSetting: TMenuItem
      Caption = #35774#32622'(&S)'
      object Menu_Parameters: TMenuItem
        Action = Action_Setting
        Caption = #23454#39564#31995#32479#35774#32622'(&E)...'
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object Menu_PID: TMenuItem
        Caption = 'PID'#31639#27861#21442#25968'(&P)'
        Enabled = False
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object Menu_Address: TMenuItem
        Caption = #20256#24863#22120#22320#22336'(&D)'
        Enabled = False
      end
    end
    object MenuExp: TMenuItem
      Caption = #23454#39564'(&E)'
      object Menu_Begin: TMenuItem
        Action = Action_Start
      end
      object Menu_Stop: TMenuItem
        Action = Action_Stop
        Caption = #32456#27490'(&T)'
      end
      object N9: TMenuItem
        Caption = '-'
      end
      object Menu_Redo: TMenuItem
        Action = Action_ReDo
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object Menu_DataView: TMenuItem
        Action = Action_DataView
        Caption = #25968#25454#26597#30475'(&V)...'
      end
    end
    object MenuHelp: TMenuItem
      Caption = #24110#21161'(&H)'
      object Menu_About: TMenuItem
        Action = Action_About
        Caption = #20851#20110'(&A)...'
      end
      object Menu_Help: TMenuItem
        Action = Action_Help
        Caption = #24110#21161'(&H)...'
      end
    end
  end
  object ActionList1: TActionList
    Left = 173
    Top = 74
    object Action_Exit: TAction
      Caption = #36864#20986
      OnExecute = Action_ExitExecute
    end
    object Action_Setting: TAction
      Caption = #21442#25968#35774#32622
      OnExecute = Action_SettingExecute
    end
    object Action_Start: TAction
      Caption = #24320#22987
      OnExecute = Action_StartExecute
    end
    object Action_Stop: TAction
      Caption = #20572#27490
      OnExecute = Action_StopExecute
    end
    object Action_ReDo: TAction
      Caption = #37325#25918
      OnExecute = Action_ReDoExecute
    end
    object Action_DataView: TAction
      Caption = #25968#25454#39044#35272
      OnExecute = Action_DataViewExecute
    end
    object Action_About: TAction
      Caption = #20851#20110
      OnExecute = Action_AboutExecute
    end
    object Action_Help: TAction
      Caption = #24110#21161
      OnExecute = Action_HelpExecute
    end
    object Action_Clear: TAction
      Caption = #28165#38500#25968#25454
      OnExecute = Action_ClearExecute
    end
    object Action_Preview: TAction
      Caption = #23454#39564#32467#26524#25171#21360
    end
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=water.mdb;Persist S' +
      'ecurity Info=False'
    LoginPrompt = False
    Mode = cmReadWrite
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 221
    Top = 258
  end
  object ADODataSet1: TADODataSet
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'Wposition'
    CommandType = cmdTable
    Parameters = <>
    Left = 173
    Top = 258
    object ADODataSet1LabTime: TFloatField
      FieldName = 'LabTime'
    end
    object ADODataSet1X1Value: TFloatField
      FieldName = 'X1Value'
    end
    object ADODataSet1X2Value: TFloatField
      FieldName = 'X2Value'
    end
    object ADODataSet1X1Ctrl: TFloatField
      FieldName = 'X1Ctrl'
    end
    object ADODataSet1X2Ctrl: TFloatField
      FieldName = 'X2Ctrl'
    end
    object ADODataSet1X1Flux: TFloatField
      FieldName = 'X1Flux'
    end
    object ADODataSet1X2Flux: TFloatField
      FieldName = 'X2Flux'
    end
  end
  object TimerRedo: TTimer
    Enabled = False
    Interval = 500
    OnTimer = TimerRedoTimer
    Left = 537
    Top = 330
  end
  object TimerControl: TTimer
    Enabled = False
    OnTimer = TimerControlTimer
    Left = 569
    Top = 330
  end
  object OpenDialog1: TOpenDialog
    Left = 123
    Top = 185
  end
  object SaveDialog1: TSaveDialog
    Left = 171
    Top = 185
  end
  object Timer_MaxTime: TTimer
    Enabled = False
    OnTimer = Timer_MaxTimeTimer
    Left = 171
    Top = 129
  end
  object Timer_Stable: TTimer
    Enabled = False
    OnTimer = Timer_StableTimer
    Left = 123
    Top = 129
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 129
    Top = 258
  end
end