⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 u_dm.dfm

📁 相关的销售服务管理行业的一个软件
💻 DFM
📖 第 1 页 / 共 5 页
字号:
  end
  object ADOQuery3: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 225
    Top = 417
  end
  object ADOQuerySGOODS: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    SQL.Strings = (
      'select * from s_goods ')
    Left = 546
    Top = 378
  end
  object DataSourceBGJC: TDataSource
    DataSet = ADOTableBGJC
    OnDataChange = DataSourceBGJCDataChange
    Left = 117
    Top = 318
  end
  object ADOTableBGJC: TADOTable
    Connection = ADOConnection
    TableName = 'xs_bgjc'
    Left = 22
    Top = 149
  end
  object ADOQueryBGJC: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    SQL.Strings = (
      'select * from xs_bgjc')
    Left = 149
    Top = 142
  end
  object PubQry: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    Left = 546
    Top = 2
  end
  object ADOTableBGDchild: TADOTable
    Connection = ADOConnection
    CursorType = ctStatic
    IndexFieldNames = 'DingDanNo'
    MasterFields = 'DingDanNo'
    TableName = 'XS_BGDChild'
    Left = 22
    Top = 101
  end
  object ADOQueryDD2: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    SQL.Strings = (
      'select * from xs_order2')
    Left = 117
    Top = 368
  end
  object ADOQueryDD3: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    SQL.Strings = (
      'select * from xs_order3')
    Left = 125
    Top = 416
  end
  object ADOQKC: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    SQL.Strings = (
      'select * from s_Customer')
    Left = 546
    Top = 48
  end
  object ADOQueryTemp: TADOQuery
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 307
    Top = 324
  end
  object ADOQuerySize: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 307
    Top = 370
  end
  object ADO_Order3: TADOQuery
    Parameters = <>
    SQL.Strings = (
      'select * from xs_oder3')
    Left = 225
    Top = 325
  end
  object ADOQreport: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    Left = 307
    Top = 416
  end
  object ADO_Color: TADOQuery
    Connection = ADOConnection
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 225
    Top = 371
  end
  object ADOConnection: TADOConnection
    KeepConnection = False
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    AfterConnect = ADOConnectionAfterConnect
    Left = 368
    Top = 48
  end
  object FrmFxShop: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT     StoreCode AS 分销店编码, '
      '           StoreName AS 商店名称, '
      '             Address AS 地址, '
      '      RelationMethod AS 联系方式, '
      '      RelationPerson AS 联系人, '
      '                type AS 类型,'
      '                Memo AS 备注'
      'FROM  xs_store')
    Left = 448
    Top = 24
  end
  object Adoxsrbm: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from xs_rbm')
    Left = 424
    Top = 456
    object Adoxsrbmid: TBCDField
      FieldName = 'id'
      ReadOnly = True
      Precision = 18
      Size = 0
    end
    object Adoxsrbmsxsrbno: TWideStringField
      FieldName = 'sxsrbno'
    end
    object Adoxsrbmsclientno: TWideStringField
      FieldName = 'sclientno'
    end
    object Adoxsrbmdrbdate: TDateTimeField
      FieldName = 'drbdate'
    end
    object Adoxsrbmsmemo: TWideStringField
      FieldName = 'smemo'
      Size = 50
    end
    object Adoxsrbmname: TStringField
      FieldKind = fkLookup
      FieldName = 'name'
      LookupDataSet = adoclient
      LookupKeyFields = 'nCCode'
      LookupResultField = 'nCName'
      KeyFields = 'sclientno'
      Size = 150
      Lookup = True
    end
  end
  object adoxsrbd: TADOQuery
    Connection = ADOConnection
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforePost = adoxsrbdBeforePost
    Parameters = <>
    SQL.Strings = (
      'select * from xs_rbd')
    Left = 480
    Top = 456
    object adoxsrbdId: TWideStringField
      FieldName = 'Id'
      Size = 50
    end
    object adoxsrbdsgoodno: TWideStringField
      FieldName = 'sgoodno'
      OnSetText = adoxsrbdsgoodnoSetText
    end
    object adoxsrbdscolor: TWideStringField
      FieldName = 'scolor'
      Size = 50
    end
    object adoxsrbdnprice: TBCDField
      FieldName = 'nprice'
      Precision = 19
      Size = 2
    end
    object adoxsrbdndw: TWideStringField
      FieldName = 'ndw'
      Size = 15
    end
    object adoxsrbdntotal: TBCDField
      FieldName = 'ntotal'
      Precision = 18
      Size = 2
    end
    object adoxsrbdsmemo: TWideStringField
      FieldName = 'smemo'
      Size = 50
    end
    object adoxsrbdndd1: TBCDField
      FieldName = 'ndd1'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd2: TBCDField
      FieldName = 'ndd2'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd3: TBCDField
      FieldName = 'ndd3'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd4: TBCDField
      FieldName = 'ndd4'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd5: TBCDField
      FieldName = 'ndd5'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd6: TBCDField
      FieldName = 'ndd6'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd7: TBCDField
      FieldName = 'ndd7'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd8: TBCDField
      FieldName = 'ndd8'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd9: TBCDField
      FieldName = 'ndd9'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd10: TBCDField
      FieldName = 'ndd10'
      Precision = 18
      Size = 0
    end
    object adoxsrbdndd11: TBCDField
      FieldName = 'ndd11'
      Precision = 18
      Size = 0
    end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -