unit11.dfm

数据库人寿保险通用系统 本系统主要负责保险资料的管理

object mydm: Tmydm
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 253
  Top = 180
  Height = 436
  Width = 560
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=ghyy'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 48
    Top = 8
  end
  object policyquery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from policy')
    Left = 136
    Top = 112
  end
  object insquery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select *from insurant')
    Left = 136
    Top = 166
  end
  object policysrc: TDataSource
    DataSet = policyquery
    Left = 48
    Top = 112
  end
  object inssrc: TDataSource
    DataSet = insquery
    Left = 48
    Top = 168
  end
  object query: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select a.*,b.*,c.*,d.* from policy as a,customer as b,insurant a' +
        's c,beneficiary as d'
      '')
    Left = 328
    Top = 280
  end
  object DataSource1: TDataSource
    DataSet = query
    Left = 200
    Top = 270
  end
  object benesrc: TDataSource
    DataSet = beneQuery
    Left = 48
    Top = 216
  end
  object beneQuery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from beneficiary')
    Left = 136
    Top = 216
  end
  object clasQuery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from class')
    Left = 136
    Top = 272
  end
  object classrc: TDataSource
    DataSet = clasQuery
    Left = 48
    Top = 272
  end
  object userQuery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from users')
    Left = 368
    Top = 60
  end
  object usersrc: TDataSource
    DataSet = userQuery
    Left = 416
    Top = 53
  end
  object cust1query: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from customer')
    Left = 136
    Top = 64
  end
  object cust1src: TDataSource
    DataSet = cust1query
    Left = 48
    Top = 64
  end
  object custquery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from customer')
    Left = 200
    Top = 64
  end
  object custsrc: TDataSource
    DataSet = custquery
    Left = 200
    Top = 166
  end
  object billQuery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from bill')
    Left = 200
    Top = 112
  end
  object Billsrc: TDataSource
    DataSet = billQuery
    Left = 200
    Top = 216
  end
  object fanQuery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from fan')
    Left = 136
    Top = 16
  end
  object fansrc: TDataSource
    DataSet = fanQuery
    Left = 200
    Top = 16
  end
  object back: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 256
    Top = 16
  end
  object guo: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select*from guo')
    Left = 384
    Top = 280
  end
  object guosrc: TDataSource
    DataSet = guo
    Left = 200
    Top = 322
  end
  object find: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 480
    Top = 128
  end
end