leave.dfm

来自「是我编写的一个考勤机管理系统,用于计算某员工某段时间以来的迟到与早退等情况.」· DFM 代码 · 共 59 行

inherited frmLeave: TfrmLeave
  Left = 336
  Top = 138
  Width = 589
  Height = 394
  Caption = #35831#20551#30331#35760
  OldCreateOrder = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  inherited Grid: TDBGrid
    Width = 581
    Height = 346
    Columns = <
      item
        Expanded = False
        FieldName = 'BillNo'
        Title.Alignment = taCenter
        Title.Caption = #21333#25454#32534#21495
        Width = 100
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Name'
        Title.Alignment = taCenter
        Title.Caption = #21592#24037#21517#31216
        Width = 100
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'LeaveDate'
        Title.Alignment = taCenter
        Title.Caption = #35831#20551#26085#26399
        Width = 100
        Visible = True
      end>
  end
  inherited ToolBar1: TToolBar
    Width = 581
    inherited BtnAdd: TToolButton
      OnClick = BtnAddClick
    end
    inherited BtnView: TToolButton
      OnClick = BtnViewClick
    end
    inherited BtnDel: TToolButton
      OnClick = BtnDelClick
    end
    inherited BtnClose: TToolButton
      OnClick = BtnCloseClick
    end
  end
  inherited DSGrid: TDataSource
    DataSet = frmDM.QurLeave
  end
end