manualglassform.dfm

source code for Marco Cantu s book Delphi 2007 Handbook

object Form13: TForm13
  Left = 0
  Top = 0
  Caption = 'ManualGlass'
  ClientHeight = 292
  ClientWidth = 554
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Shape1: TShape
    Left = 312
    Top = 120
    Width = 0
    Height = 65
  end
  object btnGlass: TButton
    Left = 8
    Top = 8
    Width = 75
    Height = 25
    Caption = 'Enable Glass'
    TabOrder = 0
    OnClick = btnGlassClick
  end
end