editclient.~dfm

针对快餐店的会员管理系统.具有详细的分类及管理作用

object EditClientForm: TEditClientForm
  Left = 197
  Top = 88
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #32534#36753#23458#25143#36164#26009
  ClientHeight = 327
  ClientWidth = 696
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  PixelsPerInch = 96
  TextHeight = 12
  object RzGroupBox1: TRzGroupBox
    Left = 7
    Top = 8
    Width = 681
    Height = 281
    Caption = ' '#23458#25143#36164#26009#20449#24687' '
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 29
      Width = 60
      Height = 12
      Caption = #23458#25143#20195#30721#65306
    end
    object Label2: TLabel
      Left = 176
      Top = 29
      Width = 60
      Height = 12
      Caption = #20844#21496#21517#31216#65306
    end
    object Label3: TLabel
      Left = 512
      Top = 29
      Width = 60
      Height = 12
      Caption = #23458#25143#31867#22411#65306
    end
    object Label4: TLabel
      Left = 16
      Top = 61
      Width = 60
      Height = 12
      Caption = #25152#23646#21306#22495#65306
    end
    object Label5: TLabel
      Left = 304
      Top = 61
      Width = 60
      Height = 12
      Caption = #36890#36805#22320#22336#65306
    end
    object Label6: TLabel
      Left = 512
      Top = 93
      Width = 60
      Height = 12
      Caption = #37038#25919#32534#30721#65306
    end
    object Label7: TLabel
      Left = 168
      Top = 93
      Width = 36
      Height = 12
      Alignment = taRightJustify
      Caption = #30005#35805#65306
    end
    object Label8: TLabel
      Left = 328
      Top = 93
      Width = 36
      Height = 12
      Caption = #20256#30495#65306
    end
    object Label9: TLabel
      Left = 384
      Top = 125
      Width = 60
      Height = 12
      Caption = #30005#23376#37038#20214#65306
    end
    object Label10: TLabel
      Left = 16
      Top = 125
      Width = 60
      Height = 12
      Caption = #20844#21496#20027#39029#65306
    end
    object Label11: TLabel
      Left = 16
      Top = 157
      Width = 60
      Height = 12
      Caption = #20844#21496#27010#20917#65306
    end
    object Label12: TLabel
      Left = 16
      Top = 93
      Width = 60
      Height = 12
      Caption = #23458#25143#31561#32423#65306
    end
    object RzDBEdit1: TRzDBEdit
      Left = 74
      Top = 24
      Width = 95
      Height = 20
      DataSource = DM1.DataSource1
      DataField = 'ID'
      FrameVisible = True
      TabOrder = 0
      OnExit = RzDBEdit1Exit
    end
    object RzDBEdit2: TRzDBEdit
      Left = 240
      Top = 24
      Width = 265
      Height = 20
      DataSource = DM1.DataSource1
      DataField = 'CoName'
      FrameVisible = True
      TabOrder = 1
    end
    object RzDBEdit3: TRzDBEdit
      Left = 368
      Top = 56
      Width = 297
      Height = 20
      DataSource = DM1.DataSource1
      DataField = 'Address'
      FrameVisible = True
      TabOrder = 2
    end
    object RzDBEdit4: TRzDBEdit
      Left = 576
      Top = 88
      Width = 89
      Height = 20
      DataSource = DM1.DataSource1
      DataField = 'Postalcode'
      FrameVisible = True
      TabOrder = 3
    end
    object RzDBEdit5: TRzDBEdit
      Left = 202
      Top = 88
      Width = 95
      Height = 20
      DataSource = DM1.DataSource1
      DataField = 'TEL'
      FrameVisible = True
      TabOrder = 4
    end
    object RzDBEdit6: TRzDBEdit
      Left = 368
      Top = 88
      Width = 139
      Height = 20
      DataSource = DM1.DataSource1
      DataField = 'FAX'
      FrameVisible = True
      TabOrder = 5
    end
    object RzDBEdit7: TRzDBEdit
      Left = 442
      Top = 120
      Width = 223
      Height = 20
      Hint = #21452#20987#21487#30452#25509#21457#36865'E-Mail'
      DataSource = DM1.DataSource1
      DataField = 'EMail'
      FrameVisible = True
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
    end
    object RzDBEdit8: TRzDBEdit
      Left = 74
      Top = 120
      Width = 295
      Height = 20
      DataSource = DM1.DataSource1
      DataField = 'WEBs'
      FrameVisible = True
      TabOrder = 7
    end
    object RzDBLookupComboBox2: TRzDBLookupComboBox
      Left = 74
      Top = 56
      Width = 95
      Height = 20
      Ctl3D = False
      DataField = 'Area'
      DataSource = DM1.DataSource1
      KeyField = #25152#23646#21306#22495
      ListSource = DM1.DataSource9
      ParentCtl3D = False
      TabOrder = 8
      FlatButtons = True
      FrameVisible = True
    end
    object DBComboBox2: TRzDBComboBox
      Left = 168
      Top = 56
      Width = 129
      Height = 20
      DataField = 'Region'
      DataSource = DM1.DataSource1
      AutoComplete = False
      Ctl3D = False
      FlatButtons = True
      FrameVisible = True
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 9
      OnExit = DBComboBox2Exit
    end
    object RzDBComboBox1: TRzDBComboBox
      Left = 576
      Top = 24
      Width = 89
      Height = 20
      DataField = 'ClientTypes'
      DataSource = DM1.DataSource1
      AutoComplete = False
      Ctl3D = False
      FlatButtons = True
      FrameVisible = True
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 10
      OnExit = RzDBComboBox1Exit
    end
    object RzDBComboBox2: TRzDBComboBox
      Left = 74
      Top = 88
      Width = 89
      Height = 20
      DataField = 'ClientTier'
      DataSource = DM1.DataSource1
      AutoComplete = False
      Ctl3D = False
      FlatButtons = True
      FrameVisible = True
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 11
      OnExit = DBComboBox2Exit
      Items.Strings = (
        #9733#9733#9733#9733#9733
        #9733#9733#9733#9733
        #9733#9733#9733
        #9733#9733
        #9733)
    end
    object RzDBMemo1: TRzDBMemo
      Left = 74
      Top = 152
      Width = 591
      Height = 121
      DataField = 'Remark'
      DataSource = DM1.DataSource1
      ScrollBars = ssVertical
      TabOrder = 12
      FrameVisible = True
    end
  end
  object RzDBNavigator1: TRzDBNavigator
    Left = 24
    Top = 296
    Width = 112
    Height = 25
    DataSource = DM1.DataSource1
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
    Hints.Strings = (
      #31532#19968#26465#35760#24405
      #21069#19968#26465#35760#24405
      #19979#19968#26465#35760#24405
      #26368#21518#19968#26465#35760#24405
      'Insert record'
      'Delete record'
      'Edit record'
      'Post edit'
      'Cancel edit'
      'Refresh data')
    BorderOuter = fsNone
    TabOrder = 6
  end
  object RzBitBtn3: TRzBitBtn
    Left = 396
    Top = 296
    Width = 97
    Hint = #22686#21152#35813#20844#21496#32852#31995#20154
    Caption = #22686#21152#32852#31995#20154
    Color = 15791348
    HighlightColor = 16026986
    HotTrack = True
    HotTrackColor = 3983359
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3