object MainForm: TMainForm Left = 329 Top = 389 AutoScroll = False BorderIcons = [biSystemMenu, biMinimize] Caption = 'Animation effects' ClientHeight = 201 ClientWidth = 254 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 8 Width = 237 Height = 26 Caption = 'Choose an animation effect and minimize this form. Click the tra' + 'y icon to restore the form.' ShowAccelChar = False WordWrap = True end object RadioGroup1: TRadioGroup Left = 8 Top = 46 Width = 237 Height = 109 Caption = ' Animation effect ' ItemIndex = 1 Items.Strings = ( '&None' 'Floating &rectangles' '&Fade (Win2000/WinXP only)' '&Implode window (has resize bug)' 'Implode &outline (has redraw bug)') TabOrder = 0 OnClick = RadioGroup1Click end object Button1: TButton Left = 88 Top = 166 Width = 75 Height = 25 Caption = 'E&xit' TabOrder = 1 OnClick = Button1Click end object CoolTrayIcon1: TCoolTrayIcon CycleInterval = 0 Hint = 'Animation effects' Icon.Data = {} IconVisible = True IconIndex = 0 MinimizeToTray = True OnClick = CoolTrayIcon1Click OnMinimizeToTray = CoolTrayIcon1MinimizeToTray Left = 40 Top = 164 end end