📄 data.dfm

📁 仓库管理信息系统
💻 DFM
📖 第 1 页 / 共 3 页
字号:
上一页 1 23
      FixedChar = True
      Size = 8
    end
    object whclbmadsDSDesigner5: TBCDField
      FieldName = #21442#32771#20215#26684
      Precision = 19
    end
    object whclbmadsID: TStringField
      FieldName = #31867#22411'ID'
      FixedChar = True
      Size = 4
    end
    object whclbmadsID2: TStringField
      FieldName = #20179#24211'ID'
      FixedChar = True
      Size = 4
    end
    object whclbmadsDSDesigner6: TIntegerField
      FieldName = #21021#22987#25968#37327
    end
    object whclbmadsDSDesigner7: TBCDField
      FieldName = #21021#22987#37329#39069
      Precision = 19
    end
    object whclbmadsDSDesigner8: TIntegerField
      FieldName = #36827#20179#25968
    end
    object whclbmadsDSDesigner9: TIntegerField
      FieldName = #20986#20179#25968
    end
    object whclbmadsDSDesigner10: TIntegerField
      FieldName = #24211#23384#25968
    end
    object whclbmadsField: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411
      LookupDataSet = whcllxdmads
      LookupKeyFields = #31867#22411'ID'
      LookupResultField = #31867#22411#21517#31216
      KeyFields = #31867#22411'ID'
      Lookup = True
    end
    object whclbmadsField2: TStringField
      FieldKind = fkLookup
      FieldName = #20179#24211#21517#31216
      LookupDataSet = whckdmads
      LookupKeyFields = #20179#24211'ID'
      LookupResultField = #20179#24211#21517#31216
      KeyFields = #20179#24211'ID'
      Lookup = True
    end
  end
  object whysrads: TADODataSet
    Connection = ADOCN
    CursorType = ctStatic
    CommandText = 'select * from YSRDMB'
    Parameters = <>
    Left = 62
    Top = 66
  end
  object whjbsjads: TADODataSet
    CacheSize = 1000
    Connection = ADOCN
    CommandText = 'select * from SYDWB'
    Parameters = <>
    Left = 352
    Top = 104
    object whjbsjadsDSDesigner: TStringField
      FieldName = #20844#21496#21517#31216
      FixedChar = True
      Size = 18
    end
    object whjbsjadsDSDesigner2: TStringField
      FieldName = #20844#21496#30005#35805
      FixedChar = True
      Size = 14
    end
    object whjbsjadsDSDesigner3: TStringField
      FieldName = #23458#25143#21517#31216
      FixedChar = True
    end
    object whjbsjadsDSDesigner4: TDateTimeField
      FieldName = #36215#29992#26085#26399
    end
    object whjbsjadsDSDesigner5: TStringField
      FieldName = #24180#20221
      FixedChar = True
      Size = 4
    end
    object whjbsjadsDSDesigner6: TStringField
      FieldName = #26376#20221
      FixedChar = True
      Size = 2
    end
  end
  object whcjtzads: TADODataSet
    CacheSize = 1000
    Connection = ADOCN
    CursorType = ctStatic
    BeforeDelete = whcjtzadsBeforeDelete
    OnNewRecord = whcjtzadsNewRecord
    CommandText = 'select * from CJTZB'
    Parameters = <>
    Left = 192
    Top = 208
    object whcjtzadsID: TAutoIncField
      FieldName = #35843#25972'ID'
      ReadOnly = True
    end
    object whcjtzadsDSDesigner2: TStringField
      FieldName = #35843#25972#21333#21495
      FixedChar = True
      Size = 10
    end
    object whcjtzadsDSDesigner: TDateTimeField
      FieldName = #35843#25972#26085#26399
    end
    object whcjtzadsDSDesigner3: TStringField
      FieldName = #35843#25972#20154
      FixedChar = True
      Size = 10
    end
    object whcjtzadsID2: TStringField
      FieldName = #29992#25143'ID'
      FixedChar = True
      Size = 4
    end
    object whcjtzadsID3: TStringField
      FieldName = #20179#24211'ID'
      FixedChar = True
      Size = 4
    end
    object whcjtzadsDSDesigner6: TStringField
      FieldName = #36865#36135#21333#21495
      FixedChar = True
      Size = 10
    end
    object whcjtzadsDSDesigner7: TStringField
      FieldName = #22791#27880
      FixedChar = True
    end
  end
  object whcllxdmads: TADODataSet
    Connection = ADOCN
    CursorType = ctStatic
    CommandText = 'select * from LXDMB'
    Parameters = <>
    Left = 64
    Top = 320
  end
  object whccmxads: TADODataSet
    CacheSize = 1000
    Connection = ADOCN
    CursorType = ctStatic
    BeforeInsert = whccmxadsBeforeInsert
    BeforePost = whccmxadsBeforePost
    AfterPost = whccmxadsAfterPost
    OnNewRecord = whccmxadsNewRecord
    CommandText = 'select * from CCMXB'
    DataSource = whccdds
    IndexFieldNames = #20986#20179'ID'
    MasterFields = #20986#20179'ID'
    Parameters = <>
    Left = 196
    Top = 160
    object whccmxadsID: TAutoIncField
      FieldName = #20986#20179#26126#32454'ID'
      ReadOnly = True
    end
    object whccmxadsID2: TStringField
      FieldName = #20986#20179'ID'
      FixedChar = True
      Size = 10
    end
    object whccmxadsDSDesigner: TStringField
      FieldName = #26448#26009#32534#30721
      FixedChar = True
      Size = 14
    end
    object whccmxadsID3: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411'ID'
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #31867#22411'ID'
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whccmxadsStringField4: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#35268#26684
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#35268#26684
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whccmxadsStringField3: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411
      LookupDataSet = whcclxdmads
      LookupKeyFields = #20986#20179#31867#22411'ID'
      LookupResultField = #20986#20179#31867#22411
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whccmxadsStringField2: TStringField
      FieldKind = fkLookup
      FieldName = #21333#20301
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #21333#20301
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whccmxadsStringField: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#21517#31216
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#21517#31216
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whccmxadsDSDesigner2: TIntegerField
      FieldName = #25968#37327
      OnChange = whccmxadsDSDesigner2Change
    end
    object whccmxadsDSDesigner3: TBCDField
      FieldName = #21333#20215
      OnChange = whccmxadsDSDesigner3Change
      Precision = 19
    end
    object whccmxadsDSDesigner4: TBCDField
      FieldName = #37329#39069
      Precision = 19
    end
    object whccmxadsDSDesigner5: TStringField
      FieldName = #22791#27880
      FixedChar = True
    end
  end
  object whckdmds: TDataSource
    DataSet = whckdmads
    Left = 104
    Top = 16
  end
  object whgysdmds: TDataSource
    DataSet = whgysdmads
    Left = 104
    Top = 112
  end
  object whjclxdmds: TDataSource
    DataSet = whjclxdmads
    Left = 104
    Top = 168
  end
  object whbmdmds: TDataSource
    DataSet = whbmdmads
    Left = 104
    Top = 224
  end
  object whcclxdmds: TDataSource
    DataSet = whcclxdmads
    Left = 104
    Top = 272
  end
  object whcllxdmds: TDataSource
    DataSet = whcllxdmads
    Left = 104
    Top = 320
  end
  object whclbmds: TDataSource
    DataSet = whclbmads
    Left = 104
    Top = 368
  end
  object whjcdds: TDataSource
    DataSet = whjcdads
    Left = 240
    Top = 16
  end
  object whjcmxds: TDataSource
    DataSet = whjcmxads
    Left = 240
    Top = 64
  end
  object whysrds: TDataSource
    DataSet = whysrads
    Left = 104
    Top = 64
  end
  object whccdds: TDataSource
    DataSet = whccdads
    Left = 244
    Top = 114
  end
  object whccmxds: TDataSource
    DataSet = whccmxads
    Left = 244
    Top = 158
  end
  object whcjtzds: TDataSource
    DataSet = whcjtzads
    Left = 240
    Top = 208
  end
  object whtzmxds: TDataSource
    DataSet = whtzmxads
    Left = 240
    Top = 256
  end
  object jcsladosp: TADOStoredProc
    CacheSize = 1000
    Connection = ADOCN
    ProcedureName = 'updatejcsl;1'
    Parameters = <>
    Left = 352
    Top = 56
  end
  object ccsladssp: TADOStoredProc
    CacheSize = 1000
    Connection = ADOCN
    ProcedureName = 'update_ccsl;1'
    Parameters = <>
    Left = 400
    Top = 56
  end
  object kcsladosp: TADOStoredProc
    CacheSize = 1000
    Connection = ADOCN
    ProcedureName = 'update_kcsl;1'
    Parameters = <>
    Left = 448
    Top = 56
  end
  object whjbsjds: TDataSource
    DataSet = whjbsjads
    Left = 400
    Top = 104
  end
  object cxjcbds: TDataSource
    DataSet = cxjcbads
    Left = 400
    Top = 160
  end
  object whyhqxads: TADODataSet
    Connection = ADOCN
    CursorType = ctStatic
    BeforeInsert = whyhqxadsBeforeInsert
    BeforeEdit = whyhqxadsBeforeEdit
    BeforePost = whyhqxadsBeforePost
    CommandText = 'select * from YHDMB'
    Parameters = <>
    Left = 192
    Top = 304
    object whyhqxadsID: TStringField
      FieldName = #29992#25143'ID'
      FixedChar = True
      Size = 2
    end
    object whyhqxadsDSDesigner: TStringField
      FieldName = #29992#25143#21517#31216
      FixedChar = True
      Size = 8
    end
    object whyhqxadsDSDesigner4: TStringField
      FieldName = #23494#30721
      FixedChar = True
    end
    object whyhqxadsID2: TStringField
      FieldName = #20179#24211'ID'
      FixedChar = True
      Size = 4
    end
    object whyhqxadsStringField: TStringField
      FieldKind = fkLookup
      FieldName = #20179#24211#21517#31216
      LookupDataSet = whckdmads
      LookupKeyFields = #20179#24211'ID'
      LookupResultField = #20179#24211#21517#31216
      KeyFields = #20179#24211'ID'
      LookupCache = True
      Lookup = True
    end
    object whyhqxadsDSDesigner3: TBooleanField
      FieldName = #36229#32423#29992#25143
    end
    object whyhqxadsDSDesigner5: TBooleanField
      FieldName = #36827#20179#21333#32500#25252
    end
    object whyhqxadsDSDesigner6: TBooleanField
      FieldName = #20986#20179#21333#32500#25252
    end
    object whyhqxadsDSDesigner7: TBooleanField
      FieldName = #21333#20215#35843#25972#32500#25252
    end
    object whyhqxadsDSDesigner8: TBooleanField
      FieldName = #26448#26009#24403#21069#24211#23384
    end
    object whyhqxadsDSDesigner9: TBooleanField
      FieldName = #21508#26376#32467#23384#26597#35810
    end
    object whyhqxadsDSDesigner10: TBooleanField
      FieldName = #36827#20179#21333#26597#35810
    end
    object whyhqxadsDSDesigner11: TBooleanField
      FieldName = #20986#20179#21333#26597#35810
    end
    object whyhqxadsDSDesigner12: TBooleanField
      FieldName = #21333#20215#35843#25972#26597#35810
    end
    object whyhqxadsDSDesigner13: TBooleanField
      FieldName = #20179#24211#32500#25252
    end
    object whyhqxadsDSDesigner14: TBooleanField
      FieldName = #20379#24212#21830#32500#25252
    end
    object whyhqxadsDSDesigner15: TBooleanField
      FieldName = #36827#20179#31867#22411#32500#25252
    end
    object whyhqxadsDSDesigner16: TBooleanField
      FieldName = #39564#25910#20154#32500#25252
    end
    object whyhqxadsDSDesigner17: TBooleanField
      FieldName = #39046#29992#37096#38376#32500#25252
    end
    object whyhqxadsDSDesigner18: TBooleanField
      FieldName = #20986#20179#31867#22411#32500#25252
    end
    object whyhqxadsDSDesigner19: TBooleanField
      FieldName = #26448#26009#31867#22411#32500#25252
    end
    object whyhqxadsDSDesigner20: TBooleanField
      FieldName = #26448#26009#32534#30721#32500#25252
    end
    object whyhqxadsDSDesigner21: TBooleanField
      FieldName = #29992#25143#35774#32622
    end
    object whyhqxadsDSDesigner22: TBooleanField
      FieldName = #24403#21069#23494#30721#20462#35813
    end
    object whyhqxadsDSDesigner2: TBooleanField
      FieldName = #25253#34920#31649#29702
    end
  end
  object whyhqxds: TDataSource
    DataSet = whyhqxads
    Left = 240
    Top = 304
  end
  object bmlyhzds: TDataSource
    DataSet = bmlyhzbads
    Left = 408
    Top = 224
  end
  object bmlymxds: TDataSource
    DataSet = bmlymxads
    Left = 408
    Top = 280
  end
  object gysghhzds: TDataSource
    DataSet = gysghhzads
    Left = 408
    Top = 328
  end
  object gysghmxds: TDataSource
    DataSet = gysghmxads
    Left = 408
    Top = 376
  end
  object qclyds: TDataSource
    DataSet = QCLYADS
    Left = 528
    Top = 128
  end
end
上一页 1 23
⌨️ 快捷键说明

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