unit2.dfm

演示怎样取电话来电显示号码

object Form2: TForm2
  Left = 282
  Top = 203
  Width = 821
  Height = 350
  Caption = 'Form2'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 80
    Top = 32
    Width = 649
    Height = 233
    AutoSize = False
    Caption = 
      #27492#31243#24207#26159#24405#36890#30340#31034#20363#31243#24207#65292#21487#20197#36890#36807#24405#36890#20844#21496#29983#20135#30340#30828#20214#65288#35805#24405#36890#65289#13#10#26041#20415#22320#24471#21040#26469#30005#26174#31034#21495#30721#65292#25320#20986#21495#30721#65292#25688#25346#26426#29366#24577#65292#38663#38083#29366#24577#65292#21487#20197#13#10 +
      #36890#36807#22768#21345#36827#34892#30005#35805#24405#38899#12290#13#10#13#10#22522#26412#30340#30005#35805#26041#38754#30340#24320#21457#22522#26412#37117#33021#28385#36275#12290#13#10#13#10#20855#20307#21151#33021#21487#20197#21442#35265#21508#22823#19979#36733#36719#20214#31449#19978#30340#8221#35805#24405#36890#30005#35805#19994#21153#31649#29702#31995 +
      #32479#8220#13#10#13#10#24405#36890#31185#25216#30340#32852#31995#26041#24335#26159#65306'    '#32593#22336#65306'http://www.lutongrj.com'#13#10'QQ: 718473996'#12288'[' +
      #22914#19981#22312#32447','#35831#30041#35328']'#13#10#32852#31995#30005#35805#65306' 01081812518'#13#10'email:'#12288#12288' [e-mail]'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
end