object Disc: TDisc
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 643
  Top = 284
  Height = 150
  Width = 215
  object du: TDialUp
    DialMode = dmAsync
    Language = ralgEnglish
    OnDialing = duDialing
    OnAsyncEvent = duAsyncEvent
    OnError = duError
    Left = 16
    Top = 8
  end
  object TimerChecaConexao: TTimer
    Enabled = False
    OnTimer = ChecaConexao
    Left = 16
    Top = 56
  end
  object trayPopup: TPopupMenu
    Left = 72
    Top = 8
    object mnInfo: TMenuItem
      Caption = '&Informa'#231#245'es sobre a conex'#227'o'
      Default = True
      OnClick = mnInfoClick
    end
    object mnDesconectar: TMenuItem
      Caption = '&Desconectar'
      OnClick = mnDesconectarClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object mnComprarCreditos: TMenuItem
      Caption = '&Comprar Cr'#233'ditos'
      OnClick = mnComprarCreditosClick
    end
    object mnIrParaExtrato: TMenuItem
      Caption = '&Extrato de utiliza'#231#227'o'
      OnClick = mnIrParaExtratoClick
    end
    object mnIrParaWebmail: TMenuItem
      Caption = '&Webmail'
      OnClick = mnIrParaWebmailClick
    end
    object mnIrParaCentral: TMenuItem
      Caption = 'Central do &assinante'
      OnClick = mnIrParaCentralClick
    end
  end
end