unit1.~dfm

来自「精彩编程百例1~25例」· ~DFM 代码 · 共 44 行

object Form1: TForm1
  Left = 194
  Top = 117
  BorderStyle = bsDialog
  BorderWidth = 5
  Caption = #36879#26126#31383#20307
  ClientHeight = 348
  ClientWidth = 533
  Color = clGreen
  TransparentColor = True
  TransparentColorValue = clGreen
  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 = 128
    Top = 120
    Width = 321
    Height = 49
    AutoSize = False
    Caption = 'Transparent Windows'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Button1: TButton
    Left = 224
    Top = 216
    Width = 81
    Height = 33
    Caption = #36864#20986
    TabOrder = 0
    OnClick = Button1Click
  end
end