object Basket: TBasket Left = 281 Top = 102 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderIcons = [] BorderStyle = bsDialog Caption = 'Basket' ClientHeight = 36 ClientWidth = 123 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Icon.Data = {} PopupMenu = PopupMenu1 Scaled = False OnClose = FormClose OnCreate = FormCreate OnMouseMove = BasketImageMouseMove PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 123 Height = 36 Align = alClient BevelOuter = bvLowered TabOrder = 0 object BasketImage: TAlAnimate Left = 1 Top = 1 Width = 32 Height = 32 Hint = 'Net Vampire' Active = False ParentShowHint = False Repetitions = 1 ShowHint = True StopFrame = 7 Transparent = False OnDblClick = ShowMainWindowMNUClick OnMouseDown = BasketImageMouseDown OnMouseUp = BasketImageMouseUp end end object PopupMenu1: TPopupMenu Left = 60 Top = 4 object AddJobMNU: TMenuItem Caption = 'Add Job...' OnClick = AddJobMNUClick end object N3: TMenuItem Caption = '-' end object MonClipboardMNU: TMenuItem Caption = 'Monitor clipboard' OnClick = MonClipboardMNUClick end object MonBrowserMNU: TMenuItem Caption = 'Monitor browser clicks' OnClick = MonBrowserMNUClick end object BasketMNU: TMenuItem Caption = 'Show Drop Basket' Checked = True OnClick = BasketMNUClick end object N2: TMenuItem Caption = '-' end object ShowMainWindowMNU: TMenuItem Caption = 'Main window' OnClick = ShowMainWindowMNUClick end object N1: TMenuItem Caption = '-' end object ExitMNU: TMenuItem Caption = 'Exit' OnClick = ExitMNUClick end end object AlDropTarget1: TAlDropTarget Enabled = True Target = Owner OnDragEnter = AlDropTarget1DragEnter OnDrop = AlDropTarget1Drop Left = 88 Top = 4 end end