about.dfm

一个很好的通讯录源码！可以学到很多小型mis的基本思想。有添加、删除、编辑等功能。

object frmabout: Tfrmabout
  Left = 366
  Top = 305
  Width = 346
  Height = 256
  BorderIcons = []
  Caption = #20851#20110
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Icon.Data = {
    0000010001001010040000000000280100001600000028000000100000002000
    0000010004000000000080000000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    000000000000000000000000000000000005570000000000055FF87000000005
    5FF008870000755FF0055088700075F00555550887007005553B555088707555
    55535555080005F55555BB555000005F555553BB55000005F55535BB55500000
    5F55BBB55500000005F5555500000000005F550000000000000550000000FFFF
    0000FE3F0000F81F0000E00F0000800700000003000000010000000000000001
    000080010000C0010000E0000000F0000000F8030000FC0F0000FE3F0000}
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object btnyes: TButton
    Left = 270
    Top = 202
    Width = 65
    Height = 20
    Cancel = True
    Caption = #30830#23450'[&Y]'
    Default = True
    TabOrder = 0
    OnClick = btnyesClick
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 338
    Height = 201
    Align = alTop
    BorderStyle = bsSingle
    Caption = ' '
    TabOrder = 1
    object Label1: TLabel
      Left = 41
      Top = 4
      Width = 216
      Height = 120
      Caption = 
        #36719#20214#24615#36136#65306#20813#36153#36719#20214'  '#13#10'    '#29256#26412#65306'V1.0'#13#10#13#10'    '#20316#32773#65306'NCIWP  '#13#10'    '#65329#65329#65306'23848507'#13#10#13#10#22914 +
        #26524#24744#23545#26412#36719#20214#36824#28385#24847#25110#32773#36824#26377#20160#20040#22909#30340#13#10#24314#35758','#35831#32473#20316#32773#21457#23553#37038#20214','#20197#34920#25903#25345'!'#13#10#13#10#27880#65306#26412#31243#24207#21487#20197#36991#20813#37325#22797#36816#34892'!'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 41
      Top = 173
      Width = 229
      Height = 19
      Cursor = crHandPoint
      Caption = 'E_MAIL'#65306'[e-mail]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -19
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = Label2DblClick
      OnDblClick = Label2DblClick
    end
    object Bevel1: TBevel
      Left = -1
      Top = 171
      Width = 334
      Height = 2
    end
    object Bevel3: TBevel
      Left = 0
      Top = 127
      Width = 333
      Height = 2
    end
    object lblOS: TLabel
      Left = 41
      Top = 146
      Width = 60
      Height = 12
      Caption = #29256#26412#20449#24687#65306
    end
    object lblMemory: TLabel
      Left = 41
      Top = 132
      Width = 60
      Height = 12
      Caption = #20869#23384#20449#24687#65306
    end
  end
end