udbm.dfm

客户管理系统用delphi做

object DM: TDM
  OldCreateOrder = False
  Left = 476
  Top = 123
  Height = 308
  Width = 344
  object ADOCon: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=db1.d' +
      'b;Mode=Share Deny None;Extended Properties="";Persist Security I' +
      'nfo=False;Jet OLEDB:System database="";Jet OLEDB:Registry Path="' +
      '";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet OLE' +
      'DB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;J' +
      'et OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Passw' +
      'ord="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt ' +
      'Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=False;Jet ' +
      'OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False'
    LoginPrompt = False
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 30
    Top = 16
  end
  object ADOTable1: TADOTable
    Connection = ADOCon
    CursorType = ctStatic
    TableName = 'Buyerinf'
    Left = 86
    Top = 18
    object ADOTable1Code_U: TIntegerField
      FieldName = 'Code_U'
      Visible = False
    end
    object ADOTable1Company_U: TWideStringField
      DisplayLabel = #20844#21496
      FieldName = 'Company_U'
    end
    object ADOTable1Branch_U: TWideStringField
      DisplayLabel = #37096#38376
      FieldName = 'Branch_U'
      Size = 12
    end
    object ADOTable1Name_U: TWideStringField
      DisplayLabel = #22995#21517
      FieldName = 'Name_U'
      Size = 8
    end
    object ADOTable1Duty_U: TWideStringField
      DisplayLabel = #32844#21153
      FieldName = 'Duty_U'
      Size = 8
    end
    object ADOTable1Realation_U: TWideStringField
      DisplayLabel = #32852#31995#26041#24335
      FieldName = 'Realation_U'
      Size = 26
    end
    object ADOTable1Email_U: TWideStringField
      DisplayLabel = #30005#23376#37038#20214
      FieldName = 'Email_U'
      Size = 32
    end
    object ADOTable1Adress_U: TWideStringField
      FieldName = 'Adress_U'
      Visible = False
      Size = 40
    end
    object ADOTable1State_U: TWideStringField
      DisplayLabel = #39033#30446#29366#24577
      FieldName = 'State_U'
      Size = 10
    end
    object ADOTable1Import_U: TWideStringField
      DisplayLabel = #37325#35201#31243#24230
      FieldName = 'Import_U'
      Size = 10
    end
    object ADOTable1Problem_U: TWideStringField
      DisplayLabel = #23384#22312#38382#39064
      FieldName = 'Problem_U'
      Size = 10
    end
    object ADOTable1Untie_U: TWideStringField
      DisplayLabel = #22914#20309#35299#20915
      FieldName = 'Untie_U'
      Size = 10
    end
    object ADOTable1Server_U: TWideStringField
      FieldName = 'Server_U'
      Visible = False
      Size = 4
    end
    object ADOTable1Sun_U: TWideStringField
      FieldName = 'Sun_U'
      Visible = False
      Size = 4
    end
    object ADOTable1Console_U: TWideStringField
      FieldName = 'Console_U'
      Visible = False
      Size = 4
    end
    object ADOTable1Memo_U: TWideStringField
      FieldName = 'Memo_U'
      Visible = False
    end
    object ADOTable1sex_U: TWideStringField
      FieldName = 'sex_U'
      Visible = False
      Size = 2
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 138
    Top = 14
  end
  object ADOTable2: TADOTable
    Connection = ADOCon
    CursorType = ctStatic
    TableName = #26085#24120#32852#31995#34920
    Left = 30
    Top = 94
    object ADOTable2DSDesigner: TAutoIncField
      FieldName = #24207#21495
      ReadOnly = True
      Visible = False
    end
    object ADOTable2DSDesigner2: TWideStringField
      FieldName = #22995#21517
      Visible = False
      Size = 8
    end
    object ADOTable2DSDesigner3: TDateTimeField
      FieldName = #26085#26399
    end
    object ADOTable2DSDesigner4: TWideStringField
      FieldName = #20027#39064
      Visible = False
      Size = 60
    end
    object ADOTable2DSDesigner5: TWideStringField
      FieldName = #20869#23481
      Size = 60
    end
    object ADOTable2DSDesigner6: TWideStringField
      FieldName = #23436#25104
      Size = 12
    end
  end
  object DataSource2: TDataSource
    DataSet = ADOTable2
    Left = 104
    Top = 98
  end
  object ADOTable3: TADOTable
    Connection = ADOCon
    CursorType = ctStatic
    TableName = #30456#20851#25991#26723
    Left = 200
    Top = 88
    object ADOTable3DSDesigner: TAutoIncField
      FieldName = #24207#21495
      ReadOnly = True
      Visible = False
    end
    object ADOTable3DSDesigner2: TWideStringField
      FieldName = #22995#21517
      Visible = False
      Size = 8
    end
    object ADOTable3DSDesigner3: TWideStringField
      DisplayWidth = 10
      FieldName = #25991#26723#31867#22411
      Size = 8
    end
    object ADOTable3DSDesigner4: TWideStringField
      FieldName = #36335#24452
      Size = 50
    end
    object ADOTable3DSDesigner5: TWideStringField
      FieldName = #22791#27880
      Size = 50
    end
  end
  object DataSource3: TDataSource
    DataSet = ADOTable3
    Left = 242
    Top = 92
  end
  object ADOTable4: TADOTable
    Connection = ADOCon
    CursorType = ctStatic
    TableName = #37325#35201#35760#20107#34920
    Left = 52
    Top = 166
    object ADOTable4DSDesigner: TAutoIncField
      FieldName = #24207#21495
      ReadOnly = True
      Visible = False
    end
    object ADOTable4DSDesigner2: TDateTimeField
      FieldName = #26102#38388
    end
    object ADOTable4DSDesigner3: TWideStringField
      FieldName = #23458#25143#20844#21496
      Size = 18
    end
    object ADOTable4DSDesigner5: TWideStringField
      FieldName = #26159#21542#23436#25104
      Size = 12
    end
    object ADOTable4DSDesigner4: TWideStringField
      DisplayWidth = 65
      FieldName = #20869#23481
      Size = 200
    end
  end
  object DataSource4: TDataSource
    DataSet = ADOTable4
    Left = 130
    Top = 192
  end
  object ADOTable5: TADOTable
    Connection = ADOCon
    CursorType = ctStatic
    TableName = #20135#21697#20449#24687#34920
    Left = 208
    Top = 180
    object ADOTable5DSDesigner: TAutoIncField
      FieldName = #24207#21495
      ReadOnly = True
      Visible = False
    end
    object ADOTable5DSDesigner2: TWideStringField
      FieldName = #20135#21697#22411#21495
    end
    object ADOTable5DSDesigner4: TWideStringField
      FieldName = #20195#29702#20215
      Size = 10
    end
    object ADOTable5DSDesigner5: TWideStringField
      FieldName = #25253#20215
      Size = 10
    end
    object ADOTable5DSDesigner6: TWideStringField
      FieldName = #26368#24213#20215
      Size = 10
    end
    object ADOTable5DSDesigner3: TWideStringField
      FieldName = #20135#21697#31616#20171
      Size = 50
    end
  end
  object DataSource5: TDataSource
    DataSet = ADOTable5
    Left = 278
    Top = 188
  end
end