unit1.dfm

演示如何通过文件取任何汉字的拼音及音标的演示源码及程序

object Form1: TForm1
  Left = 0
  Top = 0
  BorderStyle = bsDialog
  Caption = #21462#27721#23383#25340#38899
  ClientHeight = 215
  ClientWidth = 341
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Edit1: TEdit
    Left = 16
    Top = 16
    Width = 305
    Height = 21
    TabOrder = 0
    Text = #21462#27721#23383#25340#38899#31034#33539
    OnKeyDown = Edit1KeyDown
  end
  object Edit2: TEdit
    Left = 16
    Top = 43
    Width = 305
    Height = 21
    TabOrder = 1
  end
  object BitBtn1: TBitBtn
    Left = 246
    Top = 70
    Width = 75
    Height = 25
    Cancel = True
    Caption = #20851#38381
    TabOrder = 2
    OnClick = BitBtn1Click
  end
  object CheckBox1: TCheckBox
    Left = 16
    Top = 72
    Width = 97
    Height = 17
    Caption = #22797#21046#21040#31896#36148#26495
    Checked = True
    State = cbChecked
    TabOrder = 3
  end
  object XPManifest1: TXPManifest
    Left = 120
    Top = 72
  end
end