dm32.dfm

delphi框架可以学习, 写的很好的

      'select * from quotexb')
    Left = 272
    Top = 64
    object qryQuoteXBSer: TAutoIncField
      DisplayLabel = #27969#27700#21495
      FieldName = 'Ser'
      ReadOnly = True
    end
    object qryQuoteXBCpSer: TIntegerField
      DisplayLabel = #25104#21697#27969#27700#21495
      FieldName = 'CpSer'
    end
    object qryQuoteXBYlmc: TStringField
      DisplayLabel = #21407#26009#21517#31216
      FieldName = 'Ylmc'
      Size = 50
    end
    object qryQuoteXBzs: TFloatField
      DisplayLabel = #25903#25968
      FieldName = 'zs'
    end
    object qryQuoteXBtf: TFloatField
      DisplayLabel = #22836#20221
      FieldName = 'tf'
    end
    object qryQuoteXBsh: TFloatField
      DisplayLabel = #25439#32791
      FieldName = 'sh'
    end
    object qryQuoteXBbmhs: TFloatField
      DisplayLabel = #30334#30721#32791#32433
      FieldName = 'bmhs'
    end
    object qryQuoteXBsj: TFloatField
      DisplayLabel = #32433#20215
      FieldName = 'sj'
    end
    object qryQuoteXBcb: TFloatField
      DisplayLabel = #25104#26412#20215#26684
      FieldName = 'cb'
    end
    object qryQuoteXBJwlx: TStringField
      DisplayLabel = #32463#32428#31867#22411
      FieldName = 'Jwlx'
      Size = 12
    end
    object qryQuoteXBYllx: TStringField
      DisplayLabel = #21407#26009#31867#22411
      FieldName = 'Yllx'
      Size = 24
    end
  end
  object dsQuoteXB: TDataSource
    DataSet = qryQuoteXB
    Left = 288
    Top = 64
  end
  object qryJobNote: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from jobnote')
    Left = 104
    Top = 264
    object qryJobNoteSer: TAutoIncField
      DisplayLabel = #27969#27700#21495
      FieldName = 'Ser'
      ReadOnly = True
    end
    object qryJobNoteFzr: TStringField
      DisplayLabel = #36131#20219#20154
      FieldName = 'Fzr'
      Size = 12
    end
    object qryJobNoteWtsj: TDateTimeField
      DisplayLabel = #38382#39064#26102#38388
      FieldName = 'Wtsj'
    end
    object qryJobNoteclbz: TIntegerField
      DisplayLabel = #22788#29702#26631#24535
      FieldName = 'clbz'
    end
    object qryJobNotewtnr: TMemoField
      DisplayLabel = #38382#39064#20869#23481
      FieldName = 'wtnr'
      BlobType = ftMemo
    end
    object qryJobNoteUserCode: TStringField
      DisplayLabel = #29992#25143#20195#30721
      FieldName = 'UserCode'
      Size = 24
    end
    object qryJobNotewtzt: TStringField
      DisplayLabel = #38382#39064#20027#39064
      FieldName = 'wtzt'
      Size = 100
    end
    object qryJobNoteFzUserCode: TStringField
      FieldName = 'FzUserCode'
      Size = 24
    end
  end
  object dsJobNote: TDataSource
    DataSet = qryJobNote
    Left = 120
    Top = 264
  end
  object qryQuoteLine: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select top 5 bjrq,ptbj from quote order by bjrq')
    Left = 272
    Top = 112
  end
  object dsQuoteLine: TDataSource
    DataSet = qryQuoteLine
    Left = 288
    Top = 112
  end
  object qryPowerTree: TADOQuery
    Connection = conn
    Parameters = <>
    Left = 32
    Top = 64
  end
  object qryUserInfo: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from userinfo')
    Left = 184
    Top = 112
    object qryUserInfoSer: TAutoIncField
      DisplayLabel = #27969#27700#21495
      FieldName = 'Ser'
      ReadOnly = True
    end
    object qryUserInfoUserCode: TStringField
      DisplayLabel = #29992#25143#20195#30721
      FieldName = 'UserCode'
      Size = 24
    end
    object qryUserInfoPassword: TStringField
      DisplayLabel = #23494#30721
      FieldName = 'Password'
      Size = 100
    end
    object qryUserInfoEmpName: TStringField
      DisplayLabel = #30495#23454#22995#21517
      FieldName = 'EmpName'
      Size = 10
    end
    object qryUserInfoMAC1: TStringField
      DisplayLabel = #38480#21046'MAC1'
      FieldName = 'MAC1'
      Size = 24
    end
    object qryUserInfoMAC2: TStringField
      DisplayLabel = #38480#21046'MAC2'
      FieldName = 'MAC2'
      Size = 24
    end
    object qryUserInfoMAC3: TStringField
      DisplayLabel = #38480#21046'MAC3'
      FieldName = 'MAC3'
      Size = 24
    end
    object qryUserInfoGroupName: TStringField
      DisplayLabel = #32844#21153#35828#26126
      FieldName = 'GroupName'
      Size = 24
    end
    object qryUserInfoCompany: TStringField
      DisplayLabel = #20844#21496
      FieldName = 'Company'
      Size = 64
    end
    object qryUserInfoOffice: TStringField
      DisplayLabel = #25152#23646#37096#38376
      FieldName = 'Office'
      Size = 24
    end
    object qryUserInfoLastTime: TDateTimeField
      DisplayLabel = #26368#21518#30331#24405#26102#38388
      FieldName = 'LastTime'
    end
    object qryUserInfoLastIP: TStringField
      DisplayLabel = #26368#21518#30331#24405'IP'
      FieldName = 'LastIP'
      Size = 24
    end
    object qryUserInfoLastMAC: TStringField
      DisplayLabel = #26368#21518#30331#24405'MAC'
      FieldName = 'LastMAC'
      Size = 24
    end
    object qryUserInfoPowerStyle: TIntegerField
      DisplayLabel = #26435#38480#22788#29702#31867#22411
      FieldName = 'PowerStyle'
    end
    object qryUserInfoLockTime: TIntegerField
      DisplayLabel = #33258#38145#24310#26102
      FieldName = 'LockTime'
    end
    object qryUserInfoInvalid: TIntegerField
      DisplayLabel = #26159#21542#26377#25928
      FieldName = 'Invalid'
    end
    object qryUserInfoValidSTime: TFloatField
      DisplayLabel = #30331#24405#26102#38480#36215
      FieldName = 'ValidSTime'
    end
    object qryUserInfoValidETime: TFloatField
      DisplayLabel = #30331#24405#26102#38480#27490
      FieldName = 'ValidETime'
    end
    object qryUserInfoSRRQ: TDateTimeField
      DisplayLabel = #36755#20837#26085#26399
      FieldName = 'SRRQ'
    end
    object qryUserInfoCZY: TStringField
      DisplayLabel = #25805#20316#21592
      FieldName = 'CZY'
      Size = 16
    end
  end
  object dsUserInfo: TDataSource
    DataSet = qryUserInfo
    Left = 200
    Top = 112
  end
  object qryPowerInfo: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from powerinfo')
    Left = 184
    Top = 160
    object qryPowerInfoSer: TAutoIncField
      DisplayLabel = #27969#27700#21495
      FieldName = 'Ser'
      ReadOnly = True
    end
    object qryPowerInfoCode: TStringField
      DisplayLabel = #20195#30721
      FieldName = 'Code'
      Size = 50
    end
    object qryPowerInfoName: TStringField
      DisplayLabel = #21517#31216
      FieldName = 'Name'
      Size = 50
    end
    object qryPowerInfoWinName: TStringField
      DisplayLabel = #31383#21475#21517#31216
      FieldName = 'WinName'
      Size = 50
    end
    object qryPowerInfoActName: TStringField
      DisplayLabel = #25511#20214#21517#31216
      FieldName = 'ActName'
      Size = 50
    end
    object qryPowerInfoDJ: TIntegerField
      DisplayLabel = #31561#32423
      FieldName = 'DJ'
    end
  end
  object dsPowerInfo: TDataSource
    DataSet = qryPowerInfo
    Left = 200
    Top = 160
  end
  object qryUserPower: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from userpower')
    Left = 184
    Top = 208
    object qryUserPowerSer: TAutoIncField
      DisplayLabel = #27969#27700#21495
      FieldName = 'Ser'
      ReadOnly = True
    end
    object qryUserPowerUserCode: TStringField
      DisplayLabel = #29992#25143#20195#30721
      FieldName = 'UserCode'
      Size = 24
    end
    object qryUserPowerName: TStringField
      DisplayLabel = #26435#38480#21517#31216
      FieldName = 'Name'
      Size = 50
    end
    object qryUserPowerCode: TStringField
      DisplayLabel = #26435#38480#20195#30721
      FieldName = 'Code'
      Size = 24
    end
    object qryUserPowerWinName: TStringField
      DisplayLabel = #31383#21475#21517#31216
      FieldName = 'WinName'
      Size = 50
    end
    object qryUserPowerActName: TStringField
      DisplayLabel = #25511#20214#21517#31216
      FieldName = 'ActName'
      Size = 50
    end
    object qryUserPowerDJ: TIntegerField
      DisplayLabel = #31561#32423
      FieldName = 'DJ'
    end
    object qryUserPowerValid: TIntegerField
      FieldName = 'Valid'
    end
  end
  object dsUserPower: TDataSource
    DataSet = qryUserPower
    Left = 200
    Top = 208
  end
  object qryMaterial: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from material')
    Left = 272
    Top = 160
    object qryMaterialSer: TAutoIncField
      DisplayLabel = #27969#27700#21495
      FieldName = 'Ser'
      ReadOnly = True
    end
    object qryMaterialCode: TStringField
      DisplayLabel = #21407#26009#20195#30721
      FieldName = 'Code'
      Size = 24
    end
    object qryMaterialFactory: TStringField
      DisplayLabel = #21378#23478
      FieldName = 'Factory'
      Size = 100
    end
    object qryMaterialLX: TStringField
      DisplayLabel = #21407#26009#31867#22411
      FieldName = 'LX'
      Size = 50
    end
    object qryMaterialFG: TStringField
      DisplayLabel = #21407#26009#39118#26684
      FieldName = 'FG'
      Size = 50
    end
    object qryMaterialGG: TStringField
      DisplayLabel = #21407#26009#35268#26684
      FieldName = 'GG'
      Size = 50
    end
    object qryMaterialSRRQ: TDateTimeField
      DisplayLabel = #36755#20837#26085#26399
      FieldName = 'SRRQ'
    end
    object qryMaterialCZY: TStringField
      DisplayLabel = #36755#20837#20154
      FieldName = 'CZY'
      Size = 12
    end
    object qryMaterialPrice: TFloatField
      DisplayLabel = #20215#26684
      FieldName = 'Price'
    end
    object qryMaterialJGRQ: TDateField
      DisplayLabel = #20215#26684#26085#26399
      FieldName = 'JGRQ'
    end
    object qryMaterialSHRQ: TDateTimeField
      DisplayLabel = #23457#26680#26085#26399
      FieldName = 'SHRQ'
    end
    object qryMaterialSHR: TStringField
      DisplayLabel = #23457#26680#20154
      FieldName = 'SHR'
      Size = 12
    end
    object qryMaterialSHBZ: TIntegerField
      DisplayLabel = #23457#26680#26631#24535
      FieldName = 'SHBZ'
    end
    object qryMaterialCSRQ: TDateTimeField
      DisplayLabel = #25764#23457#26085#26399
      FieldName = 'CSRQ'
    end