fmdemomain.dfm

多数代码可以直接在Delphi6和Delphi7环境下运行。部分涉及.NET技术内容的代码

object Form1: TForm1
  Left = 291
  Top = 215
  Width = 501
  Height = 374
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 15
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 493
    Height = 49
    Align = alTop
    TabOrder = 0
    object Button1: TButton
      Left = 16
      Top = 8
      Width = 121
      Height = 33
      Caption = #20648#23384#23545#35937
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 136
      Top = 8
      Width = 121
      Height = 33
      Caption = #25913#21464#39068#33394
      TabOrder = 1
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 256
      Top = 8
      Width = 121
      Height = 33
      Caption = #25913#21464#23383#20307
      TabOrder = 2
      OnClick = Button3Click
    end
  end
  object Edit1: TEdit
    Left = 8
    Top = 56
    Width = 169
    Height = 23
    TabOrder = 1
    Text = 'Edit1'
  end
  object Memo1: TMemo
    Left = 264
    Top = 56
    Width = 217
    Height = 265
    Lines.Strings = (
      #21487#22312#24212#29992#31243#24207#36816#34892#26102#21160#24577#25913
      #21464'VCL'#23545#35937#30340#33539#20363
      ''
      #32780#19988#25913#21464#30340'VCL'#23545#35937#21487#20351#29992'VCL '
      'Framework'#30340'Persistent'#21151#33021
      #20445#23384)
    TabOrder = 2
  end
  object Edit2: TEdit
    Left = 8
    Top = 128
    Width = 249
    Height = 23
    TabOrder = 3
    Text = 'Edit2'
  end
  object ColorDialog1: TColorDialog
    Left = 152
    Top = 120
  end
  object FontDialog1: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Left = 152
    Top = 160
  end
end