gld120_01.dfm.svn-base

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

inherited Gld120_01Form: TGld120_01Form
  Left = 186
  Top = 97
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #24120#29992#35789#27719#32500#25252
  ClientWidth = 521
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  object gbClass: TGroupBox [0]
    Left = 8
    Top = 8
    Width = 145
    Height = 329
    Caption = #35789#27719#31867#21035
    TabOrder = 0
    object lbClass: TListBox
      Left = 7
      Top = 15
      Width = 130
      Height = 202
      ItemHeight = 12
      TabOrder = 0
      OnClick = lbClassClick
    end
    object bbtnClassAdd: TBitBtn
      Left = 16
      Top = 232
      Width = 113
      Height = 23
      Caption = #22686#21152'(&I)'
      TabOrder = 1
      OnClick = bbtnClassAddClick
    end
    object bbtnClassUpdate: TBitBtn
      Left = 16
      Top = 264
      Width = 113
      Height = 23
      Caption = #20462#25913'(&U)'
      TabOrder = 2
      OnClick = bbtnClassUpdateClick
    end
    object bbtnClassDelete: TBitBtn
      Left = 16
      Top = 296
      Width = 113
      Height = 23
      Caption = #21024#38500'(&L)'
      TabOrder = 3
      OnClick = bbtnClassDeleteClick
    end
  end
  object bbtnOk: TBitBtn [1]
    Left = 440
    Top = 24
    Width = 75
    Height = 25
    Caption = #30830#23450'(&O)'
    TabOrder = 1
    OnClick = bbtnOkClick
  end
  object bbtnExit: TBitBtn [2]
    Left = 440
    Top = 56
    Width = 75
    Height = 25
    Caption = #36864#20986'(&X)'
    TabOrder = 2
    OnClick = bbtnExitClick
  end
  object BitBtn6: TBitBtn [3]
    Left = 440
    Top = 240
    Width = 75
    Height = 25
    Caption = #22686#21152'(&A)'
    TabOrder = 3
    OnClick = BitBtn6Click
  end
  object BitBtn7: TBitBtn [4]
    Left = 440
    Top = 272
    Width = 75
    Height = 25
    Caption = #20462#25913'(&E)'
    TabOrder = 4
    OnClick = BitBtn7Click
  end
  object BitBtn8: TBitBtn [5]
    Left = 440
    Top = 304
    Width = 75
    Height = 25
    Caption = #21024#38500'(&D)'
    TabOrder = 5
    OnClick = BitBtn8Click
  end
  object gbDetail: TGroupBox [6]
    Left = 160
    Top = 8
    Width = 273
    Height = 329
    Caption = #35789#27719#26126#32454
    TabOrder = 6
    object lbDetail: TListBox
      Left = 8
      Top = 16
      Width = 257
      Height = 305
      ItemHeight = 12
      TabOrder = 0
    end
  end
  object dsGld120A: TDataSource
    DataSet = qryGld120A
    Left = 88
    Top = 48
  end
  object dsGld120B: TDataSource
    DataSet = qryGld120B
    Left = 264
    Top = 64
  end
  object qryGld120A: TADOQuery
    Connection = SYSDM.ADOC
    Parameters = <>
    SQL.Strings = (
      'select * from GLD120A')
    Left = 96
    Top = 72
  end
  object qryGld120B: TADOQuery
    Connection = SYSDM.ADOC
    DataSource = dsGld120A
    Parameters = <>
    SQL.Strings = (
      'select * from GLD120B')
    Left = 272
    Top = 80
  end
end