unit1.dfm

《Delphi案例设计》源代码

object Form1: TForm1
  Left = 196
  Top = 102
  Width = 544
  Height = 363
  Caption = #22266#23450#36164#20135#31649#29702#31383#20307
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = #23435#20307
  Font.Style = [fsItalic]
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 11
  object Label1: TLabel
    Left = 104
    Top = 48
    Width = 337
    Height = 29
    Caption = #27426#36814#20351#29992#22266#23450#36164#20135#31649#29702#36719#20214
    Font.Charset = GB2312_CHARSET
    Font.Color = clYellow
    Font.Height = -27
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold, fsUnderline]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 105
    Top = 49
    Width = 337
    Height = 29
    Caption = #27426#36814#20351#29992#22266#23450#36164#20135#31649#29702#36719#20214
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -27
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold, fsUnderline]
    ParentFont = False
    Transparent = True
  end
  object SpeedButton1: TSpeedButton
    Left = 152
    Top = 152
    Width = 225
    Height = 25
    Caption = #36827#20837#24405#20837#32534#36753#31383#20307
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = #21326#25991#24425#20113
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 152
    Top = 208
    Width = 225
    Height = 27
    Caption = #27983#35272#22266#23450#36164#20135#20840#37096#20869#23481
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = #21326#25991#24425#20113
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton2Click
  end
  object SpeedButton3: TSpeedButton
    Left = 152
    Top = 256
    Width = 225
    Height = 26
    Caption = #32467#26463#31995#32479#25805#20316
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = #21326#25991#24425#20113
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton3Click
  end
end