PC World Komputer 1998 July & August/Pcwk78a98.iso/E-MAIL/Emailnot/_SETUP.1/CIECHECK.exe/0/RCDATA/TFORM3/TFORM3.txt

Text File | 1998-05-06 | 31KB | 965 lines

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 = {<image000.ico>}
    DisabledIcon.Data = {<image001.unknown>}
    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 = {<image002.bmp>}
      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 = {<image003.bmp>}
      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 = {<image004.bmp>}
      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 = {<image005.bmp>}
      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 = {<image006.bmp>}
      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 = {<image007.bmp>}
      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 = {<image008.bmp>}
      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 = {<image009.bmp>}
      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 = {<image010.bmp>}
      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 = {<image011.bmp>}
      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 = {<image012.bmp>}
      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 = {<image013.bmp>}
      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 = {<image014.bmp>}
      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 = {<image015.bmp>}
      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 = {<image016.bmp>}
      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 = {<image017.bmp>}
      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 = {<image018.bmp>}
      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 = {<image019.bmp>}
      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 = {<image020.bmp>}
      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 = {<image021.bmp>}
      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 = {<image022.bmp>}
      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 = {<image023.bmp>}
      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 = {<image024.bmp>}
      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 = {<image025.bmp>}
      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 = {<image026.bmp>}
      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 = {<image027.bmp>}
      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 = {<image028.bmp>}
      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 = {<image029.bmp>}
      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