uprint.dfm

一个很好的员工档案管理系统源码 有无限制树

inherited frmPrint: TfrmPrint
  Left = 261
  Top = 175
  BorderStyle = bsSingle
  Caption = #25171#21360
  ClientHeight = 173
  ClientWidth = 295
  ParentFont = False
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 78
    Top = 9
    Width = 110
    Height = 20
    Caption = #25171' '#21360' '#35774' '#32622
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -20
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object cbInfo: TCheckBox
    Left = 26
    Top = 43
    Width = 105
    Height = 19
    Caption = #22522#26412#20449#24687
    Checked = True
    State = cbChecked
    TabOrder = 0
  end
  object cbEx: TCheckBox
    Left = 29
    Top = 75
    Width = 105
    Height = 19
    Caption = #24037#20316#32463#21382
    Checked = True
    State = cbChecked
    TabOrder = 1
  end
  object cbTrain: TCheckBox
    Left = 26
    Top = 113
    Width = 105
    Height = 18
    Caption = #25945#32946#32972#26223
    Checked = True
    State = cbChecked
    TabOrder = 2
  end
  object btnPrint: TBitBtn
    Left = 25
    Top = 147
    Width = 65
    Height = 22
    Caption = #25171' '#21360
    TabOrder = 3
    OnClick = btnPrintClick
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      0400000000007800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0000000000
      0FFFF0888888888080FF000000000000080F0888888FFF88000F088888877788
      080F00000000000008800888888888808080F000000000080800FF0FFFFFFFF0
      8080FFF0F00000F0000FFFF0FFFFFFFF0FFFFFFF0F00000F0FFFFFFF0FFFFFFF
      F0FFFFFFF000000000FFFFFFFFFFFFFFFFFF}
  end
  object btnClose: TBitBtn
    Left = 177
    Top = 147
    Width = 65
    Height = 22
    Caption = #20851' '#38381
    TabOrder = 4
    Kind = bkCancel
  end
  object fdsSinfo: TfrDBDataSet
    DataSet = DM.aqStaf
    Left = 96
    Top = 32
  end
  object fdsExper: TfrDBDataSet
    DataSet = DM.aqExperf
    Left = 128
    Top = 32
  end
  object fdsTrain: TfrDBDataSet
    DataSet = DM.aqTrainf
    Left = 96
    Top = 96
  end
  object frPer: TfrReport
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    RebuildPrinter = False
    Left = 128
    Top = 96
    ReportForm = {19000000}
  end
end