itemdata_gz.dfm

来自「一个详细功能齐全的档案管理信息系统 跟大家分享一下。这是老师给的光盘里带的」· DFM 代码 · 共 79 行

object fItemdata_GZ: TfItemdata_GZ
  Left = 215
  Top = 175
  Width = 659
  Height = 434
  Caption = #29992#25143#31649#29702
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 2
    Width = 651
    Height = 2
  end
  object GroupBox1: TGroupBox
    Left = 87
    Top = 11
    Width = 488
    Height = 329
    Caption = #29992#25143#31649#29702
    TabOrder = 0
    object Bevel2: TBevel
      Left = -139
      Top = 267
      Width = 627
      Height = 42
      Shape = bsFrame
    end
    object DBGrid1: TDBGrid
      Left = 1
      Top = 24
      Width = 484
      Height = 226
      DataSource = DsUserInfo
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
    object DBNavigator1: TDBNavigator
      Left = 52
      Top = 276
      Width = 390
      Height = 25
      DataSource = DsUserInfo
      TabOrder = 1
    end
  end
  object Cexit: TButton
    Left = 288
    Top = 352
    Width = 75
    Height = 25
    Caption = #36820#22238
    TabOrder = 1
    OnClick = CexitClick
  end
  object DsUserInfo: TDataSource
    DataSet = fdm.UserInfo
    Left = 192
    Top = 112
  end
end