unit28.~dfm

来自「应对服装行业的生产成本控制系统」· ~DFM 代码 · 共 419 行

~DFM
419
字号
object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 319
  Top = 7
  Height = 618
  Width = 531
  object DCOMConnection1: TDCOMConnection
    Connected = True
    ServerGUID = '{1E3FACBA-310A-4F3A-81EC-C45B4B517C3A}'
    ServerName = 'Project1.fzcbhsglxt'
    ComputerName = 'KF'
    Left = 39
    Top = 16
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider1'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 67
  end
  object DataSource1: TDataSource
    DataSet = ClientDataSet1
    Left = 99
    Top = 67
  end
  object ClientDataSet2: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider2'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 119
  end
  object DataSource2: TDataSource
    DataSet = ClientDataSet2
    Left = 99
    Top = 119
  end
  object ClientDataSet3: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider3'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 171
  end
  object DataSource3: TDataSource
    DataSet = ClientDataSet3
    Left = 99
    Top = 171
  end
  object ClientDataSet4: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider4'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 223
  end
  object DataSource4: TDataSource
    DataSet = ClientDataSet4
    Left = 99
    Top = 223
  end
  object ClientDataSet5: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider5'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 277
  end
  object DataSource5: TDataSource
    DataSet = ClientDataSet5
    Left = 99
    Top = 277
  end
  object ClientDataSet6: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider6'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 329
  end
  object DataSource6: TDataSource
    DataSet = ClientDataSet6
    Left = 99
    Top = 329
  end
  object ClientDataSet7: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider7'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 381
  end
  object DataSource7: TDataSource
    DataSet = ClientDataSet7
    Left = 99
    Top = 381
  end
  object ClientDataSet8: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider8'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 433
  end
  object DataSource8: TDataSource
    DataSet = ClientDataSet8
    Left = 99
    Top = 433
  end
  object ClientDataSet9: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider9'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 67
  end
  object DataSource9: TDataSource
    DataSet = ClientDataSet9
    Left = 276
    Top = 67
  end
  object ClientDataSet10: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider10'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 119
  end
  object DataSource10: TDataSource
    DataSet = ClientDataSet10
    Left = 276
    Top = 119
  end
  object ClientDataSet11: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider11'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 171
  end
  object DataSource11: TDataSource
    DataSet = ClientDataSet11
    Left = 276
    Top = 171
  end
  object ClientDataSet12: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider12'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 223
  end
  object DataSource12: TDataSource
    DataSet = ClientDataSet12
    Left = 276
    Top = 223
  end
  object ClientDataSet13: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider13'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 277
  end
  object DataSource13: TDataSource
    DataSet = ClientDataSet13
    Left = 276
    Top = 277
  end
  object ClientDataSet14: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider14'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 329
  end
  object DataSource14: TDataSource
    DataSet = ClientDataSet14
    Left = 276
    Top = 329
  end
  object ClientDataSet15: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider15'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 381
  end
  object DataSource15: TDataSource
    DataSet = ClientDataSet15
    Left = 276
    Top = 381
  end
  object ClientDataSet16: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider16'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 433
  end
  object DataSource16: TDataSource
    DataSet = ClientDataSet16
    Left = 276
    Top = 433
  end
  object ClientDataSet17: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider17'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 67
  end
  object DataSource17: TDataSource
    DataSet = ClientDataSet17
    Left = 451
    Top = 67
  end
  object ClientDataSet18: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider18'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 119
  end
  object DataSource18: TDataSource
    DataSet = ClientDataSet18
    Left = 451
    Top = 119
  end
  object ClientDataSet19: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider19'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 171
  end
  object DataSource19: TDataSource
    DataSet = ClientDataSet19
    Left = 451
    Top = 171
  end
  object ClientDataSet20: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider20'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 223
  end
  object DataSource20: TDataSource
    DataSet = ClientDataSet20
    Left = 451
    Top = 223
  end
  object ClientDataSet21: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider21'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 277
  end
  object DataSource21: TDataSource
    DataSet = ClientDataSet21
    Left = 451
    Top = 277
  end
  object ClientDataSet22: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider22'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 329
  end
  object DataSource22: TDataSource
    DataSet = ClientDataSet22
    Left = 451
    Top = 329
  end
  object ClientDataSet23: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider23'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 381
  end
  object DataSource23: TDataSource
    DataSet = ClientDataSet23
    Left = 451
    Top = 381
  end
  object ClientDataSet24: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider24'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 433
  end
  object DataSource24: TDataSource
    DataSet = ClientDataSet24
    Left = 451
    Top = 433
  end
  object ClientDataSet25: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider25'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 16
  end
  object DataSource25: TDataSource
    DataSet = ClientDataSet25
    Left = 276
    Top = 16
  end
  object ClientDataSet26: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider26'
    RemoteServer = DCOMConnection1
    Left = 373
    Top = 16
  end
  object DataSource26: TDataSource
    DataSet = ClientDataSet26
    Left = 445
    Top = 16
  end
  object ClientDataSet27: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider27'
    RemoteServer = DCOMConnection1
    Left = 32
    Top = 485
  end
  object DataSource27: TDataSource
    DataSet = ClientDataSet27
    Left = 99
    Top = 485
  end
  object ClientDataSet28: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider28'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 485
  end
  object DataSource28: TDataSource
    DataSet = ClientDataSet28
    Left = 276
    Top = 485
  end
  object ClientDataSet29: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider29'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 485
  end
  object DataSource29: TDataSource
    DataSet = ClientDataSet29
    Left = 451
    Top = 485
  end
  object ClientDataSet30: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider30'
    RemoteServer = DCOMConnection1
    Left = 204
    Top = 533
  end
  object DataSource30: TDataSource
    DataSet = ClientDataSet30
    Left = 276
    Top = 533
  end
  object ClientDataSet31: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DataSetProvider31'
    RemoteServer = DCOMConnection1
    Left = 377
    Top = 533
  end
  object DataSource31: TDataSource
    DataSet = ClientDataSet31
    Left = 451
    Top = 533
  end
end

⌨️ 快捷键说明

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