ps_comdepartment.dfm

DELPHI5加SQL SERVER2000完成的进销存系统,具体哪些内容记不清了,六七年前写的,希望还能有点贡献

object F_comdepartment: TF_comdepartment
  Left = 271
  Top = 204
  BorderStyle = bsSingle
  Caption = '部门资料设定'
  ClientHeight = 237
  ClientWidth = 328
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnActivate = FormShow
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 328
    Height = 237
    Align = alClient
    TabOrder = 0
    object L_id1: TLabel
      Left = 16
      Top = 24
      Width = 65
      Height = 16
      Caption = '部门编号：'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object L_name1: TLabel
      Left = 16
      Top = 51
      Width = 65
      Height = 16
      Caption = '部门名称：'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object L_memo1: TLabel
      Left = 16
      Top = 78
      Width = 39
      Height = 16
      Caption = '备注：'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object E_id: TDBEdit
      Left = 80
      Top = 20
      Width = 89
      Height = 21
      DataField = 'id'
      DataSource = comdatabase.DS_comdepartment
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object E_name: TDBEdit
      Left = 80
      Top = 46
      Width = 217
      Height = 24
      DataField = 'name'
      DataSource = comdatabase.DS_comdepartment
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object M_memo: TDBMemo
      Left = 16
      Top = 96
      Width = 297
      Height = 121
      DataField = 'memo'
      DataSource = comdatabase.DS_comdepartment
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
  end
end