lendlist.~dfm

来自「图书管理系统」· ~DFM 代码 · 共 82 行

object frmLendList: TfrmLendList
  Left = 0
  Top = 146
  Width = 961
  Height = 557
  Caption = #20511#20070#20449#24687
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poScreenCenter
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 38
    Top = 37
    Width = 154
    Height = 27
    AutoSize = False
    Caption = #20511#20070#20449#24687#21015#34920
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object btnSave: TButton
    Left = 495
    Top = 484
    Width = 116
    Height = 31
    Caption = #20462#25913'&M'
    TabOrder = 1
    OnClick = btnSaveClick
  end
  object btnClose: TButton
    Left = 725
    Top = 484
    Width = 116
    Height = 31
    Caption = #36820#22238'&X'
    TabOrder = 2
    OnClick = btnCloseClick
  end
  object StringGrid: TStringGrid
    Left = 30
    Top = 85
    Width = 898
    Height = 385
    ColCount = 13
    DefaultRowHeight = 18
    RowCount = 20
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnDblClick = StringGridDblClick
    OnDrawCell = StringGridDrawCell
  end
  object btnDelete: TButton
    Left = 610
    Top = 484
    Width = 116
    Height = 31
    Caption = #21024#38500'&D'
    TabOrder = 3
    OnClick = btnDeleteClick
  end
end