cardata.dfm

本系统是SQL SERVER的管理系统

object Data: TData
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 268
  Top = 252
  Height = 480
  Width = 696
  object Database: TDatabase
    AliasName = 'carsale'
    DatabaseName = 'car'
    LoginPrompt = False
    SessionName = 'Session1_1'
    Left = 16
    Top = 8
  end
  object usesTable: TTable
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'uses'
    Left = 16
    Top = 72
  end
  object usesDataSource: TDataSource
    DataSet = usesTable
    Left = 32
    Top = 120
  end
  object cartypeTable: TTable
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'cartype'
    Left = 40
    Top = 304
  end
  object cartypeDataSource: TDataSource
    DataSet = cartypeTable
    Left = 40
    Top = 352
  end
  object colorTable: TTable
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'color'
    Left = 128
    Top = 304
  end
  object colorDataSource: TDataSource
    DataSet = colorTable
    Left = 128
    Top = 352
  end
  object springTable: TTable
    CachedUpdates = True
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'spring'
    Left = 216
    Top = 304
  end
  object springDataSource: TDataSource
    DataSet = springTable
    Left = 216
    Top = 352
  end
  object usetypeTable: TTable
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'usetype'
    Left = 296
    Top = 296
  end
  object usetypeDataSource: TDataSource
    DataSet = usetypeTable
    Left = 304
    Top = 344
  end
  object repertoryQuery: TQuery
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    SQL.Strings = (
      'select * from repertory'
      'where buysell=false')
    Left = 184
    Top = 8
  end
  object repertoryDataSource1: TDataSource
    DataSet = repertoryQuery
    Left = 192
    Top = 72
  end
  object repertoryTable: TTable
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'repertory'
    Left = 104
    Top = 8
  end
  object repertoryDataSource: TDataSource
    DataSet = repertoryTable
    Left = 112
    Top = 56
  end
  object saleQuery: TQuery
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    SQL.Strings = (
      'select sale.*,repertory.*  from sale ,repertory,repsa'
      ' where sale.comno=repsa.comno and repsa.number=repertory.number')
    Left = 352
    Top = 24
  end
  object saleDataSource: TDataSource
    DataSet = saleQuery
    Left = 360
    Top = 80
  end
  object saleTable: TTable
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'sale'
    Left = 16
    Top = 184
  end
  object saleDataSource1: TDataSource
    DataSet = saleTable
    Left = 32
    Top = 240
  end
  object repsaTable: TTable
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'repsa'
    Left = 144
    Top = 184
  end
  object repsaDataSource: TDataSource
    DataSet = repsaTable
    Left = 152
    Top = 240
  end
  object comQuery: TQuery
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    SQL.Strings = (
      
        'select sale.* ,repertory.* ,profit.*  from  sale,repertory,repsa' +
        ',profit'
      
        'where sale.comno=repsa.comno and repsa.number=repertory.number  ' +
        'and sale.comno=profit.comno')
    Left = 432
    Top = 24
  end
  object comDataSource: TDataSource
    DataSet = comQuery
    Left = 432
    Top = 88
  end
  object profitTable: TTable
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    TableName = 'profit'
    Left = 256
    Top = 192
  end
  object profitDataSource: TDataSource
    DataSet = profitTable
    Left = 256
    Top = 248
  end
  object profitQuery: TQuery
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    SQL.Strings = (
      'select * from profit ')
    Left = 320
    Top = 192
  end
  object profitDataSource1: TDataSource
    DataSet = profitQuery
    Left = 328
    Top = 240
  end
  object saleQuery1: TQuery
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    SQL.Strings = (
      'select * from sale')
    Left = 64
    Top = 192
  end
  object usesQuery: TQuery
    DatabaseName = 'car'
    SessionName = 'Session1_1'
    SQL.Strings = (
      'select * from uses')
    Left = 40
    Top = 48
  end
  object Session1: TSession
    Active = True
    AutoSessionName = True
    Left = 256
    Top = 24
  end
end