u_data.dfm

来自「超信人力资源管理系统,一个用Delphi编写的人事管理系统」· DFM 代码 · 共 97 行

object DM: TDM
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 287
  Top = 170
  Height = 243
  Width = 337
  object Q_TempA: TADOQuery
    Connection = ADOCon
    Parameters = <>
    Left = 32
    Top = 88
  end
  object ADOCon: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=SIERP;Data Source=Francis'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 24
    Top = 16
  end
  object Q_TempB: TADOQuery
    Connection = ADOCon
    Parameters = <>
    Left = 104
    Top = 88
  end
  object Q_LOG: TADOQuery
    Connection = ADOCon
    Parameters = <>
    Left = 32
    Top = 160
  end
  object Q_TempC: TADOQuery
    Connection = ADOCon
    Parameters = <>
    Left = 152
    Top = 80
  end
  object SaveD: TSaveDialog
    Left = 184
    Top = 160
  end
  object PrintDBGrid: TPrintDBGridEh
    Options = []
    Page.BottomMargin = 2.000000000000000000
    Page.LeftMargin = 2.000000000000000000
    Page.RightMargin = 2.000000000000000000
    Page.TopMargin = 2.000000000000000000
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -11
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -11
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    Units = MM
    Left = 152
    Top = 16
  end
  object Q_PICTURE: TADOQuery
    Parameters = <>
    Left = 256
    Top = 144
  end
  object DSADOReport: TDataSource
    DataSet = ADOReport
    Left = 232
    Top = 48
  end
  object ADOReport: TADODataSet
    Connection = ADOCon
    CursorType = ctStatic
    Parameters = <>
    Left = 232
    Top = 8
  end
  object ADODataSetReport: TADODataSet
    Connection = ADOCon
    CursorType = ctStatic
    Parameters = <>
    Left = 232
    Top = 96
  end
  object QTemp: TADODataSet
    Connection = ADOCon
    Parameters = <>
    Left = 96
    Top = 152
  end
end