salesmanfrm.dfm

这是一个本人初定的小制作

object SalesManDlg: TSalesManDlg
  Left = 160
  Top = 132
  BorderStyle = bsDialog
  Caption = 'SalesManDlg'
  ClientHeight = 415
  ClientWidth = 556
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 24
    Top = 16
    Width = 36
    Height = 12
    Caption = #32534#21495#65306
  end
  object Label2: TLabel
    Left = 24
    Top = 154
    Width = 36
    Height = 12
    Caption = #22995#21517#65306
  end
  object Label3: TLabel
    Left = 24
    Top = 62
    Width = 36
    Height = 12
    Caption = #24615#21035#65306
  end
  object Label4: TLabel
    Left = 16
    Top = 200
    Width = 84
    Height = 12
    Caption = #25152#23646#37096#38376#32534#21495#65306
  end
  object Label5: TLabel
    Left = 24
    Top = 108
    Width = 36
    Height = 12
    Caption = #29366#24577#65306
  end
  object Label6: TLabel
    Left = 256
    Top = 16
    Width = 36
    Height = 12
    Caption = #29031#29255#65306
  end
  object Label7: TLabel
    Left = 248
    Top = 136
    Width = 36
    Height = 12
    Caption = #22791#27880#65306
  end
  object DBEdtId: TDBEdit
    Left = 104
    Top = 16
    Width = 145
    Height = 20
    DataField = 'Id'
    DataSource = DMMain.DSSalesMan
    TabOrder = 0
  end
  object DBEdtname: TDBEdit
    Left = 104
    Top = 152
    Width = 145
    Height = 20
    DataField = 'Name'
    DataSource = DMMain.DSSalesMan
    TabOrder = 1
  end
  object DBCBSex: TDBComboBox
    Left = 104
    Top = 56
    Width = 145
    Height = 20
    DataField = 'Sex'
    DataSource = DMMain.DSSalesMan
    ItemHeight = 12
    Items.Strings = (
      'f'
      'm')
    TabOrder = 2
  end
  object DBCBStatus: TDBComboBox
    Left = 104
    Top = 104
    Width = 145
    Height = 20
    DataField = 'Status'
    DataSource = DMMain.DSSalesMan
    ItemHeight = 12
    Items.Strings = (
      #22312#32844
      #31163#32844
      #35831#20551)
    TabOrder = 3
  end
  object DBImage: TDBImage
    Left = 296
    Top = 16
    Width = 185
    Height = 113
    DataField = 'Pic'
    DataSource = DMMain.DSSalesMan
    Stretch = True
    TabOrder = 4
  end
  object DBMRemark: TDBMemo
    Left = 296
    Top = 136
    Width = 233
    Height = 73
    DataField = 'Remark'
    DataSource = DMMain.DSSalesMan
    TabOrder = 5
  end
  object CBDepartId: TComboBox
    Left = 96
    Top = 192
    Width = 145
    Height = 20
    ItemHeight = 12
    TabOrder = 6
  end
  object BtnAdd: TButton
    Left = 16
    Top = 232
    Width = 75
    Height = 25
    Caption = #28155#21152'(&A)'
    TabOrder = 7
    OnClick = BtnAddClick
  end
  object BtnEdit: TButton
    Left = 128
    Top = 232
    Width = 75
    Height = 25
    Caption = #20462#25913'(&E)'
    TabOrder = 8
    OnClick = BtnEditClick
  end
  object BtnDelete: TButton
    Left = 248
    Top = 232
    Width = 75
    Height = 25
    Caption = #21024#38500'(&D)'
    TabOrder = 9
    OnClick = BtnDeleteClick
  end
  object BtnBrowse: TButton
    Left = 488
    Top = 104
    Width = 57
    Height = 25
    Caption = #27983#35272'(&B)'
    TabOrder = 10
    OnClick = BtnBrowseClick
  end
  object DBGrid: TDBGrid
    Left = 0
    Top = 264
    Width = 537
    Height = 145
    DataSource = DMMain.DSSalesMan
    TabOrder = 11
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnCellClick = DBGridCellClick
    OnKeyPress = DBGridKeyPress
    OnMouseDown = DBGridMouseDown
  end
  object BtnOK: TButton
    Left = 360
    Top = 232
    Width = 75
    Height = 25
    Caption = #30830#35748#20462#25913'(&O)'
    Enabled = False
    TabOrder = 12
    OnClick = BtnOKClick
  end
  object BtnCancel: TButton
    Left = 464
    Top = 232
    Width = 75
    Height = 25
    Caption = #21462#28040#20462#25913'(&C)'
    Enabled = False
    TabOrder = 13
    OnClick = BtnCancelClick
  end
  object OpenPicDlg: TOpenPictureDialog
    Left = 384
    Top = 80
  end
end