⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 main.dfm

📁 自己做的通讯录程序
💻 DFM
📖 第 1 页 / 共 5 页
字号:
object Form1: TForm1
  Left = 28
  Top = 17
  Width = 951
  Height = 691
  Caption = #36890#35759#24405
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020000001000800A80800001600000028000000200000004000
    0000010008000000000080040000000000000000000000010000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C000C0DC
    C000F0CAA600CCFFFF0099FFFF0066FFFF0033FFFF00FFCCFF00CCCCFF0099CC
    FF0066CCFF0033CCFF0000CCFF00FF99FF00CC99FF009999FF006699FF003399
    FF000099FF00FF66FF00CC66FF009966FF006666FF003366FF000066FF00FF33
    FF00CC33FF009933FF006633FF003333FF000033FF00CC00FF009900FF006600
    FF003300FF00FFFFCC00CCFFCC0099FFCC0066FFCC0066FFCC0033FFCC0000FF
    CC00FFCCCC00CCCCCC0099CCCC0066CCCC0033CCCC0000CCCC00FF99CC00CC99
    CC009999CC006699CC003399CC000099CC00FF66CC00CC66CC009966CC006666
    CC003366CC000066CC00FF33CC00CC33CC009933CC006633CC003333CC000033
    CC00FF00CC00CC00CC009900CC006600CC003300CC000000CC00FFFF9900CCFF
    990099FF990066FF990033FF990000FF9900FFCC9900CCCC990099CC990066CC
    990033CC990000CC9900FF999900CC9999009999990066999900339999000099
    9900FF669900CC66990099669900666699003366990000669900FF339900CC33
    990099339900663399003333990000339900FF009900CC009900990099006600
    99003300990000009900FFFF6600CCFF660099FF660066FF660033FF660000FF
    6600FFCC6600CCCC660099CC660066CC660033CC660000CC6600FF996600CC99
    660099996600669966003399660000996600FF666600CC666600996666006666
    66003366660000666600FF336600CC3366009933660066336600333366000033
    6600FF006600CC00660099006600660066003300660000006600FFFF3300CCFF
    330099FF330066FF330033FF330000FF3300FFCC3300CCCC330099CC330066CC
    330033CC330000CC3300FF993300CC9933009999330066993300339933000099
    3300FF663300CC66330099663300666633003366330000663300FF333300CC33
    330099333300663333003333330000333300FF003300CC003300990033006600
    33003300330000003300CCFF000099FF000066FF000033FF0000FFCC0000CCCC
    000099CC000066CC000033CC000000CC0000FF990000CC990000999900006699
    00003399000000990000FF660000CC6600009966000066660000006600003366
    0000FF330000CC33000099330000663300003333000000330000CC0000009900
    000066000000330000000000DD000000BB000000AA0000008800000077000000
    5500000044000000220000DD000000BB000000AA000000880000007700000055
    00000044000000220000DDDDDD00555555007777770077777700444444002222
    22001111110077000000550000004400000022000000F0FBFF00A4A0A0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000B400000000000000000000000000
    000000000000000000000000000000000000B400000000000000000000000000
    000000000000000000000000000000000000B400000000000000000000000000
    0000000000000000000000000000000000B4E900000000000000000000000000
    0000000000000000000000000000000000B4E900000000000000000000000000
    000000000000000000B4000000000000B4E90000000000000000000000000000
    0000000000000000B4E9000000000000B4E90000000000000000000000000000
    00000000000000B4E9E9B400000000B4E9000000000000000000000000000000
    00000000000000B4E9E9E900000000B4E900000000E900000000000000000000
    000000000000B4E9E9B4E9B4000000B4E9000000B400000000B4000000000000
    000000000000B4E9E9B4E9E9E900B4E9E90000E9E9000000B4B4000000000000
    000000000000B4E9E9B4E9E9E9B4E9E9E9E9E9B4000000B4E9E9000000000000
    00000000000000B4E9E9B4E9E9E9B4B4E9B4E9000000B4E9E9E9000000000000
    0000000000000000B4E9E9E9E9B4E9E9E9E9E90000B4E9E9B400000000000000
    000000000000000000B42323232323232222B4E9B4E9B4E9E900000000000000
    000000000000232323231C1C1C1C2315151C2222B4E9E9E90000000000000000
    000000000023231C1C1C1515151C1C1515151C22E9E900000000000000000000
    0000000023231C1C15151515151C1C151515151C232300000000000000000000
    00000000231C1C1515151515151C1515151515151C2300000000000000000000
    00000000231C1515151515151C1C1515151515151C2300000000000000000000
    00000000231C1515151515151C1C1515151515151C2300000000000000000000
    0000002323221515151515151C1C1515151515151C2300000000000000000000
    000023231C1515151515151C1C231C15151515151C2300000000000000000000
    0023231C15151C1515151C1C23231C1C1C15151C1C2323000000000000000000
    002323231C1C1C1C1C1C1C1C7171231C1C1C1C1C1C1C23230000000000000000
    000000231C1C711C231C1C222371231C1C1C23231C1C1C230000000000000000
    000000232371711C23232323231C2323231C1C23231C23230000000000000000
    00000000231C1C1C2223711C1C1C1C1C23232371232323000000000000000000
    000000002323231C1C232323231C1C1C23717123232300000000000000000000
    0000000000002323232300002323232323000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFF7FFFFFFF7FFFFFFF7FFFFFFE7FFFFFFE7FFFFEFCFFFFFCFCFFFFF87
    9FFFFF879EFFFF039DEFFF0119CFFF00038FFF80070FFFC0061FFFE0001FFF00
    003FFE0000FFFC0000FFFC0000FFFC0000FFFC0000FFF80000FFF00000FFE000
    007FE000003FF800003FF800003FFC00007FFC0000FFFF0C1FFFFFFFFFFF}
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter2: TSplitter
    Left = 0
    Top = 247
    Width = 943
    Height = 5
    Cursor = crVSplit
    Align = alTop
  end
  object Splitter1: TSplitter
    Left = 0
    Top = 437
    Width = 943
    Height = 5
    Cursor = crVSplit
    Align = alBottom
  end
  object NameList: TSortableListView
    Left = 0
    Top = 252
    Width = 943
    Height = 185
    Align = alClient
    Columns = <
      item
        Caption = #22995#21517
        Width = 75
      end
      item
        Caption = #30005#35805
        Width = 300
      end
      item
        Caption = #20998#32452
        Width = 130
      end
      item
        Caption = #25152#22312#22478#24066
        Width = 60
      end
      item
        Caption = #21333#20301
        Width = 200
      end>
    ReadOnly = True
    MultiSelect = True
    OnChange = NameListChange
    OnColumnClick = NameListColumnClick
    ParentShowHint = False
    ShowHint = False
    PopupMenu = PopupMenu1
    TabOrder = 0
    ViewStyle = vsReport
  end
  object sbContent: TScrollBox
    Left = 0
    Top = 29
    Width = 943
    Height = 218
    Align = alTop
    BevelInner = bvLowered
    BevelOuter = bvNone
    TabOrder = 1
    object btDelete: TBitBtn
      Left = 757
      Top = 122
      Width = 156
      Height = 39
      Cursor = crHandPoint
      Caption = '- '#21024#38500
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = #38582#20070
      Font.Style = []
      ParentFont = False
      TabOrder = 14
      OnClick = btDeleteClick
    end
    object clbGroup: TCheckListBox
      Left = 608
      Top = 5
      Width = 137
      Height = 202
      BevelInner = bvNone
      BevelOuter = bvRaised
      BevelKind = bkFlat
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 13
      ParentFont = False
      TabOrder = 11
    end
    object Name: TEdit
      Left = 72
      Top = 5
      Width = 161
      Height = 24
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      TabOrder = 0
    end
    object email: TEdit
      Left = 72
      Top = 51
      Width = 497
      Height = 24
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      TabOrder = 4
    end
    object city: TEdit
      Left = 384
      Top = 5
      Width = 185
      Height = 24
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      TabOrder = 2
    end
    object telphone: TEdit
      Left = 72
      Top = 28
      Width = 497
      Height = 24
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      TabOrder = 3
    end
    object homeaddress: TEdit
      Left = 72
      Top = 120
      Width = 497
      Height = 24
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      TabOrder = 7
    end
    object unitname: TEdit
      Left = 72
      Top = 97
      Width = 497
      Height = 24
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      TabOrder = 6
    end
    object Remark: TMemo
      Left = 72
      Top = 165
      Width = 497
      Height = 42
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      TabOrder = 10
      WantReturns = False
    end
    object sex: TComboBox
      Left = 272
      Top = 5
      Width = 50
      Height = 24
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      Style = csDropDownList
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 16
      ItemIndex = 0
      ParentFont = False
      TabOrder = 1
      Text = #30007
      Items.Strings = (
        #30007
        #22899
        ' ')
    end
    object uselevel: TComboBox
      Left = 520
      Top = 143
      Width = 49
      Height = 24
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvRaised
      Style = csDropDownList
      Color = clInfoBk
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -