unit1.dfm

Delphi的函数例子

object Form1: TForm1
  Left = 303
  Top = 176
  Width = 381
  Height = 249
  Caption = 'StrECopy'#20989#25968
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClick = FormClick
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 0
    Top = 209
    Width = 373
    Height = 13
    Align = alBottom
    Caption = #21333#20987#31383#20307#26174#31034#36816#34892#32467#26524#12290
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
end