object Form3: TForm3 Left = 403 Top = 360 Width = 186 Height = 130 HelpContext = 360 Caption = 'Cyber-Info E-Mail Notify' Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnPaint = FormPaint OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object TrayIcon: TPGTrayIcon95 Icon.Data = {} DisabledIcon.Data = {} Animation.Interval = 500 Animation.Options = aoIconsInExe Active = True Hint = 'Cyber-Info E-Mail Notify' OnClick = TrayIconClick OnDblClick = TrayIconDblClick OnMouseEnter = TrayIconMouseEnter Options = [toMinimizeToTray] PopupMenu = PopupMenu1 State = tsAnimated Left = 43 Top = 5 end object PopupMenu1: TPopupMenu Alignment = paRight AutoPopup = False OnPopup = PopupMenu1Popup Left = 12 Top = 36 object CheckEmail1: TMenuItem Caption = ' Check E-mail' HelpContext = 410 ShortCut = 0 OnClick = CheckEmail1Click end object Options1: TMenuItem Caption = ' Options' HelpContext = 420 ShortCut = 0 OnClick = Options1Click end object HotMailSettings1: TMenuItem Caption = ' HotMail Settings' ShortCut = 0 OnClick = HotMailSettings1Click end object RunExternalReader1: TMenuItem Caption = ' Run External Reader' HelpContext = 430 ShortCut = 0 OnClick = RunExternalReader1Click end object QuickEMail1: TMenuItem Caption = ' Quick E-Mail / Internet-Fax' HelpContext = 440 ShortCut = 0 OnClick = QuickEMail1Click end object N1: TMenuItem Caption = '-' HelpContext = 450 ShortCut = 0 end object ViewMessageHeader1: TMenuItem Caption = ' View Message Header' HelpContext = 460 ShortCut = 0 OnClick = ViewMessageHeader1Click end object ViewLocalEMail1: TMenuItem Caption = ' View Local E-Mail' HelpContext = 470 ShortCut = 0 OnClick = ViewLocalEMail1Click object InBox1: TMenuItem Caption = ' InBox' ShortCut = 0 OnClick = InBox1Click end object OutBox1: TMenuItem Caption = ' OutBox' ShortCut = 0 OnClick = OutBox1Click end end object N3: TMenuItem Caption = '-' HelpContext = 480 ShortCut = 0 end object Registration: TMenuItem Caption = ' Registration' HelpContext = 490 ShortCut = 0 OnClick = RegistrationClick end object AboutUs1: TMenuItem Caption = ' Visit Our Web-Site' HelpContext = 500 ShortCut = 0 OnClick = AboutUs1Click end object Help1: TMenuItem Caption = ' Help' ShortCut = 0 OnClick = Help1Click end object N4: TMenuItem Caption = '-' HelpContext = 550 ShortCut = 0 end object OtherUtilities1: TMenuItem Caption = ' Windows Utilities' HelpContext = 560 ShortCut = 0 object SystemInfo1: TMenuItem Caption = ' System Information' ShortCut = 0 OnClick = SystemInfo1Click end object DisableSystemKeys1: TMenuItem Caption = ' Disable System Keys' ShortCut = 0 OnClick = DisableSystemKeys1Click end object N6: TMenuItem Caption = '-' ShortCut = 0 end object LogoffWindows1: TMenuItem Caption = ' Logoff Windows' ShortCut = 0 OnClick = LogoffWindows1Click end object RestartWindows1: TMenuItem Caption = ' Restart Windows' ShortCut = 0 OnClick = RestartWindows1Click end object ShutDownWindows1: TMenuItem Caption = ' ShutDown Windows' ShortCut = 0 OnClick = ShutDownWindows1Click end object DOSPrompt1: TMenuItem Caption = ' DOS Prompt' ShortCut = 0 OnClick = DOSPrompt1Click end object N5: TMenuItem Caption = '-' ShortCut = 0 end object HideDesktop1: TMenuItem Caption = ' Hide Desktop' ShortCut = 0 OnClick = HideDesktop1Click end object HideTaskbar1: TMenuItem Caption = ' Hide Taskbar' ShortCut = 0 OnClick = HideTaskbar1Click end object StartScreenSaver1: TMenuItem Caption = ' Start ScreenSaver' ShortCut = 0 OnClick = StartScreenSaver1Click end object ChangeResolution1: TMenuItem Caption = ' Screen Resolution' ShortCut = 0 OnClick = ChangeResolution1Click end end object InternetUtilities1: TMenuItem Caption = ' Internet Utilities' HelpContext = 570 ShortCut = 0 object MicrosoftDUN1: TMenuItem Caption = ' Microsoft DUN' ShortCut = 0 OnClick = MicrosoftDUN1Click end object GetIPaddresses1: TMenuItem Caption = ' Get IP address(es)' ShortCut = 0 OnClick = GetIPaddresses1Click end end object N2: TMenuItem Caption = '-' HelpContext = 510 ShortCut = 0 end object Disable1: TMenuItem Caption = ' Disable Program' HelpContext = 520 ShortCut = 0 OnClick = Disable1Click end object Exit1: TMenuItem Caption = ' Exit E-Mail Notify' HelpContext = 530 ShortCut = 0 OnClick = Exit1Click end end object Timer1: TTimer Interval = 10176 OnTimer = Timer1Timer Left = 11 Top = 6 end object msPOP1: TmsRemotePOP WinsockLoaded = True DefaultPort = 110 OnError = msPOP1Error OnNextInfoUpdated = msPOP1NextInfoUpdated Left = 79 Top = 28 end object agRas1: TagRas ForceService = False RemovePassword = False TimeOut = 240 OnStatusChange = agRas1StatusChange OnDisconnected = agRas1Disconnected Left = 35 Top = 66 end object Timer3: TTimer Enabled = False Interval = 10000 OnTimer = Timer3Timer Left = 106 Top = 2 end object JustOne321: TJustOne32 Left = 107 Top = 31 end object CoolMenu1: TCoolMenu CoolMenuBar.Active = True CoolMenuBar.Caption = 'Cyber-Info E-Mail Notify 3.62a' CoolMenuBar.IsGradient = True HSpace = 3 CheckedBitmap.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 180000000000000300000000000000000000000000000000000000007F00007F 00007F00007F00007F00007F00007F00007F00007F00007F00007F00007F0000 7F00007F00007F00007F00007F00007F00007F00007F00007F00007F00007F00 007F00007F00007F00007F00007F00007F00007F00007F00007F00007F00007F 00007F00007F00007F0000FF00000000007F00007F00007F00007F00007F0000 7F00007F00007F00007F00007F00007F00007F00007F0000FF0000FF0000FF00 000000007F00007F00007F00007F00007F00007F00007F00007F00007F00007F 00007F00007F0000FF0000FF0000FF00000000007F00007F00007F00007F0000 7F00007F00007F00007F00007F00007F00007F0000FF0000FF0000FF0000FF00 00FF00000000007F00007F00007F00007F00007F00007F00007F00007F00007F 0000FF0000FF0000FF0000FF0000FF0000FF00000000007F00007F00007F0000 7F00007F00007F00007F00007F007F7F0000FF0000FF00000000007F0000FF00 00FF0000FF00000000007F00007F00007F00007F00007F00007F007F7F0000FF 00000000007F00007F00007F00007F0000FF0000FF00000000007F00007F0000 7F00007F00007F00007F00007F00007F00007F00007F00007F00007F00007F00 00FF0000FF0000FF00000000007F00007F00007F00007F00007F00007F00007F 00007F00007F00007F00007F00007F00007F0000FF0000FF00000000007F0000 7F00007F00007F00007F00007F00007F00007F00007F00007F00007F00007F00 007F00007F0000FF0000FF00000000007F00007F00007F00007F00007F00007F 00007F00007F00007F00007F00007F00007F00007F00007F007F7F0000FF0000 0000007F00007F00007F00007F00007F00007F00007F00007F00007F00007F00 007F00007F00007F00007F007F7F0000FF00000000007F00007F00007F00007F 00007F00007F00007F00007F00007F00007F00007F00007F00007F00007F0000 7F0000FF0000FF00000000007F00007F00007F00007F00007F00007F00007F00 007F00007F00007F00007F00007F00007F00007F00007F00007F} RadioBitmap.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 180000000000000300000000000000000000000000000000000000007F00007F 00007F00007F00007F00007F00007F00007F00007F00007F00007F00007F0000 7F00007F00007F00007F00007F00007F00007F00007F00007F00000000000000 000000000000000000007F00007F00007F00007F00007F00007F00007F00007F 00007F000000000000BFBFBFBFBFBF7F7F7F7F7F7F7F7F7F0000000000000000 7F00007F00007F00007F00007F00007F000000BFBFBFBFBFBF7F7F7F00000000 00000000007F7F7F7F7F7F7F7F7F00000000007F00007F00007F00007F000000 BFBFBFBFBFBF0000000000000000000000000000000000000000007F7F7F7F7F 7F00000000007F00007F00007F000000BFBFBF00000000000000000000000000 00000000000000000000000000007F7F7F00000000007F00007F000000BFBFBF 7F7F7F0000000000000000000000FF0000FF0000FF0000000000000000007F7F 7F7F7F7F00000000007F000000BFBFBF0000000000000000000000FF0000FF00 00FF0000FF0000FF0000000000000000007F7F7F00000000007F000000FFFFFF 0000000000000000000000FF0000FF0000FF0000FF0000FF0000000000000000 007F7F7F00000000007F000000FFFFFF000000000000000000BFBFBF0000FF00 00FF0000FF0000FF000000000000000000BFBFBF00000000007F000000FFFFFF 7F7F7F000000000000000000BFBFBFBFBFBF0000FF0000000000000000007F7F 7FBFBFBF00000000007F00007F000000BFBFBF00000000000000000000000000 0000000000000000000000000000BFBFBF00000000007F00007F00007F000000 FFFFFFBFBFBF000000000000000000000000000000000000000000BFBFBFBFBF BF00000000007F00007F00007F00007F000000FFFFFFBFBFBF7F7F7F00000000 00000000007F7F7FBFBFBFBFBFBF00000000007F00007F00007F00007F00007F 00007F000000000000FFFFFFFFFFFFFFFFFFBFBFBFBFBFBF0000000000000000 7F00007F00007F00007F00007F00007F00007F00007F00007F00000000000000 000000000000000000007F00007F00007F00007F00007F00007F} OnPopup = CoolMenu1Popup Left = 42 Top = 36 object CoolMenuItem1: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clYellow Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = CheckEmail1 Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem2: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clWhite Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = Options1 Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem3: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clLime Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = RunExternalReader1 Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem4: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clFuchsia Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = QuickEMail1 Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem5: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = N1 BevelType = btRoundedRect SeparatorText = 'View E-Mail ' Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem6: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clFuchsia Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = ViewMessageHeader1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem7: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clFuchsia Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = ViewLocalEMail1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem8: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = InBox1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem9: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = OutBox1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem10: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = N3 BevelType = btRoundedRect SeparatorText = 'Registration' Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem11: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = Registration BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem12: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = AboutUs1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem13: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = N2 BevelType = btRoundedRect SeparatorText = 'Disable Program' Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem14: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = Disable1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem15: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = Exit1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem16: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] TrColor = clSilver Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = N4 BevelType = btRoundedRect SeparatorText = 'Utilities' Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem17: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clFuchsia Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = OtherUtilities1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem18: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = DOSPrompt1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem19: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = 12566272 Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = LogoffWindows1 BevelType = btRoundedRect SeparatorText = 'Disable Program' Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem20: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = 12566272 Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = RestartWindows1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem21: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = 8750469 Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = ShutDownWindows1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem22: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] TrColor = 12566272 Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = N5 BevelType = btRoundedRect SeparatorText = 'Disable Program' Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem23: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = HideDesktop1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem24: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = HideTaskbar1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem25: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clLime Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = InternetUtilities1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem26: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = GetIPaddresses1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem27: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clFuchsia Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = MicrosoftDUN1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem28: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] TrColor = 12566272 Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = N6 BevelType = btRoundedRect SeparatorText = 'Restart Windows' Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem29: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clLime Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = SystemInfo1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem30: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = DisableSystemKeys1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem31: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clFuchsia Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = StartScreenSaver1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem32: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clLime Options = [omFixedImgSize, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = ChangeResolution1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem33: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clSilver Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = Help1 BevelType = btRoundedRect Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end object CoolMenuItem34: TCoolMenuItem Font.Color = clBlue Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Picture.Data = {} TrColor = clWhite Options = [omFixedImgSize, omDrawBarIfNeeded, omTileWallpaper, omTileSelWallpaper, omNoImageAttached] Menu = PopupMenu1 MenuItem = HotMailSettings1 Shadow.Active = True Shadow.ShadowColor = clBtnShadow Shadow.SelShadowColor = cl3DDkShadow Shadow.SelShadowSize = 3 Shadow.ShadowPos = spRightBottom end end object msMessage1: TmsMessage ContentType = 'text/plain' ReturnReceipt = False Left = 71 Top = 66 end object msSMTP1: TmsSMTP WinsockLoaded = True DefaultPort = 25 MailMessage = msMessage1 Left = 101 Top = 65 end object WinReboot1: TWinReboot Left = 5 Top = 65 end object SystemHide1: TSystemHide Left = 129 Top = 64 end object WSocket1: TWSocket Proto = 'tcp' MultiThreaded = True SendFlags = wsSendNormal Left = 143 Top = 11 end object Timer4: TTimer Enabled = False Interval = 500 OnTimer = Timer4Timer Left = 148 Top = 70 end object Timer5: TTimer Enabled = False Interval = 500 OnTimer = Timer5Timer Left = 145 Top = 41 end object Timer2: TTimer Enabled = False Interval = 500 OnTimer = Timer2Timer Left = 72 end object Timer6: TTimer Enabled = False Interval = 500 OnTimer = Timer6Timer Left = 66 Top = 49 end object HTTP1: TagHTTP WinsockLoaded = True DefaultPort = 80 TimeOut = 120 Left = 124 Top = 30 end object Timer7: TTimer Enabled = False Interval = 5000 OnTimer = Timer7Timer Left = 119 Top = 64 end object agRas2: TagRas ForceService = False TimeOut = 240 Left = 59 Top = 65 end end