unit1.~dfm

Delphi的函数例子

object Form1: TForm1
  Left = 323
  Top = 204
  Width = 281
  Height = 182
  Caption = #30331#24405#23494#30721#26159#21542#27491#30830#65292#19981#21306#20998#22823#23567#20889
  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 = 37
    Top = 28
    Width = 99
    Height = 13
    Caption = #35831#36755#20837#23494#30721#65306'         '
  end
  object Label2: TLabel
    Left = 37
    Top = 67
    Width = 78
    Height = 13
    Caption = #30830#35748#23494#30721#65306'      '
  end
  object Edit1: TEdit
    Left = 116
    Top = 24
    Width = 121
    Height = 21
    TabOrder = 0
  end
  object Edit2: TEdit
    Left = 116
    Top = 63
    Width = 121
    Height = 21
    TabOrder = 1
  end
  object Button1: TButton
    Left = 150
    Top = 113
    Width = 75
    Height = 25
    Caption = #30331#24405
    TabOrder = 2
    OnClick = Button1Click
  end
end