changepurviewformunit.dfm

Delphi编写的通讯录

object ChangePurViewFrorm: TChangePurViewFrorm
  Left = 310
  Top = 191
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #26356#25913#26435#38480
  ClientHeight = 337
  ClientWidth = 305
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 56
    Top = 24
    Width = 73
    Height = 20
    AutoSize = False
    Caption = #29992#25143#21517#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 57
    Top = 64
    Width = 72
    Height = 20
    Caption = #23494'    '#30721#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label3: TLabel
    Left = 59
    Top = 103
    Width = 72
    Height = 20
    Caption = #26435'    '#38480#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 192
    Width = 305
    Height = 145
    Align = alCustom
    BevelInner = bvLowered
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 2
      Top = 2
      Width = 301
      Height = 141
      Align = alClient
      DataSource = AddAccountForm.DataSource1
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = DBGrid1DblClick
    end
  end
  object edtCUser: TEdit
    Left = 136
    Top = 24
    Width = 121
    Height = 21
    Color = clScrollBar
    ReadOnly = True
    TabOrder = 1
  end
  object edtcCPwd: TEdit
    Left = 136
    Top = 64
    Width = 121
    Height = 21
    Color = clScrollBar
    ReadOnly = True
    TabOrder = 2
  end
  object CBCPurview: TComboBox
    Left = 136
    Top = 102
    Width = 121
    Height = 21
    ItemHeight = 13
    TabOrder = 3
    Items.Strings = (
      #31649#29702#21592
      #29992#25143)
  end
  object BtChange: TButton
    Left = 64
    Top = 144
    Width = 75
    Height = 25
    Caption = #26356#25913
    TabOrder = 4
    OnClick = BtChangeClick
  end
  object BtExit2: TButton
    Left = 184
    Top = 144
    Width = 75
    Height = 25
    Caption = #36864#20986
    TabOrder = 5
    OnClick = BtExit2Click
  end
end