dm.dfm

管理车队用车记录

object Form_dm: TForm_dm
  Left = 343
  Top = 141
  Width = 533
  Height = 484
  Caption = 'Form_dm'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object ADOConnection: TADOConnection
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 80
    Top = 40
  end
  object ADOTable_users: TADOTable
    Connection = ADOConnection
    CursorType = ctStatic
    TableName = 'users'
    Left = 80
    Top = 88
  end
  object ADOTable_driver: TADOTable
    Connection = ADOConnection
    TableName = 'driver'
    Left = 128
    Top = 88
  end
  object ADOTable_car: TADOTable
    Connection = ADOConnection
    TableName = 'car'
    Left = 168
    Top = 88
  end
  object ADOTable_repair: TADOTable
    Connection = ADOConnection
    CursorType = ctStatic
    TableName = 'repair'
    Left = 208
    Top = 88
  end
  object ADOTable_oil: TADOTable
    Connection = ADOConnection
    CursorType = ctStatic
    TableName = 'oil'
    Left = 248
    Top = 88
  end
  object ADOTable_car_out: TADOTable
    Connection = ADOConnection
    CursorType = ctStatic
    AfterOpen = ADOTable_car_outAfterOpen
    TableName = 'car_out'
    Left = 296
    Top = 88
  end
  object ADOTable_driver_car: TADOTable
    Connection = ADOConnection
    TableName = 'driver_car'
    Left = 344
    Top = 88
  end
  object DataSource1: TDataSource
    DataSet = ADOTable_users
    Left = 80
    Top = 136
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery_driver
    Left = 128
    Top = 136
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery_car
    Left = 176
    Top = 136
  end
  object ADOQuery_driver: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from driver;')
    Left = 128
    Top = 176
  end
  object ADOQuery_car: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select car.* ,driver_car.driver_name from car,driver_car where c' +
        'ar.id=driver_car.car_id;')
    Left = 176
    Top = 176
  end
  object ADOTable_params: TADOTable
    Connection = ADOConnection
    TableName = 'params'
    Left = 392
    Top = 88
  end
  object ADOTable_employer: TADOTable
    Connection = ADOConnection
    TableName = 'employer'
    Left = 440
    Top = 88
  end
  object ADOQuery_signers: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    Left = 488
    Top = 184
  end
  object ADOTable_type1: TADOTable
    Connection = ADOConnection
    TableName = 'type1'
    Left = 488
    Top = 88
  end
  object ADOTable_type2: TADOTable
    Connection = ADOConnection
    TableName = 'type2'
    Left = 528
    Top = 88
  end
  object ADOTable_begin1: TADOTable
    Connection = ADOConnection
    TableName = 'begin1'
    Left = 568
    Top = 88
  end
  object ADOTable_end1: TADOTable
    Connection = ADOConnection
    TableName = 'end1'
    Left = 608
    Top = 88
  end
  object ADOCommand1: TADOCommand
    Connection = ADOConnection
    Parameters = <>
    Left = 72
    Top = 256
  end
  object ADOTable_signers: TADOTable
    Connection = ADOConnection
    TableName = 'signers'
    Left = 488
    Top = 144
  end
  object ADOtable_repairspot: TADOTable
    Connection = ADOConnection
    TableName = 'repairspot'
    Left = 648
    Top = 88
  end
  object ADOTable_repairitem: TADOTable
    Connection = ADOConnection
    TableName = 'repairitem'
    Left = 688
    Top = 88
  end
  object ADOTable_oilspot: TADOTable
    Connection = ADOConnection
    TableName = 'oilspot'
    Left = 728
    Top = 88
  end
  object ADOTable_oiltype: TADOTable
    Connection = ADOConnection
    TableName = 'oiltype'
    Left = 768
    Top = 88
  end
  object DataSource4: TDataSource
    DataSet = ADOTable_car_out
    Left = 304
    Top = 136
  end
  object DataSource5: TDataSource
    DataSet = ADOQuery_signers
    Left = 256
    Top = 136
  end
  object DataSource6: TDataSource
    DataSet = ADOTable_repairitem
    Left = 216
    Top = 136
  end
  object DataSource7: TDataSource
    DataSet = ADOQuery_carout
    Left = 184
    Top = 320
  end
  object ADOQuery_carout: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    AfterOpen = ADOQuery_caroutAfterOpen
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 184
    Top = 280
  end
  object ADOQuery_common: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    Parameters = <>
    Left = 400
    Top = 200
  end
  object DataSource8: TDataSource
    DataSet = ADOQuery_common
    Left = 400
    Top = 248
  end
  object ADOQuery_oil: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from oil')
    Left = 232
    Top = 184
  end
  object DataSource9: TDataSource
    DataSet = ADOQuery_oil
    Left = 232
    Top = 232
  end
  object ADOQuery_repair: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from repair')
    Left = 288
    Top = 184
  end
  object DataSource10: TDataSource
    DataSet = ADOQuery_repair
    Left = 288
    Top = 232
  end
  object ADOQuery_common2: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    Parameters = <>
    Left = 448
    Top = 200
  end
  object DataSource11: TDataSource
    DataSet = ADOQuery_common2
    Left = 448
    Top = 248
  end
  object ADOTable_shouru: TADOTable
    Connection = ADOConnection
    CursorType = ctStatic
    TableName = 'shouru'
    Left = 576
    Top = 152
  end
  object DataSource12: TDataSource
    DataSet = ADOTable_shouru
    Left = 576
    Top = 200
  end
  object ADOTable_shouru1: TADOTable
    Connection = ADOConnection
    CursorType = ctStatic
    TableName = 'shouru1'
    Left = 624
    Top = 152
  end
end