Comando Prompt não exibe nada na tela

[porter]

olá pessoal,
A "mensagem" do comando PROMPT não funciona no Harbour 3.2, não exibe nada, quando chega na linha do prompt não dá erro
mas não mostra nada na tela

Código: Selecionar todos

#Include "hwgui.ch"
#include "harupdf.ch"
#include "wvtwin.ch"
#include "hbgtinfo.ch"
#include "hbgtwvg.ch"
#include "hwgcompat.ch"

Proc Main()
   SET(40,159)
   SETMODE(25,80) 
   DO WHILE .T.
      @ 10,10 PROMPT " Imprimir Relatorio " 
      @ 11,10 PROMPT " Encerrar Execucao  "
      MENU TO nOp
      IF LASTKEY() = 27
         EXIT
      ENDIF
     DO CASE
      CASE nOp = 1
           OpenRel(alltrim(cArq))
      CASE nOp = 2
           RETU
     ENDCASE
   ENDDO

[JoséQuintas]

Que raios é isto?

Código: Selecionar todos

#Include "hwgui.ch"
#include "wvtwin.ch"
#include "hbgtwvg.ch"
#include "hwgcompat.ch"

ou é Harbour, ou é hwgui, ou é wvt, tudo junto desse jeito não dá.

[anacatacombs]

Provavelmente teve ter alguma redefinição do comando @ PROMPT em algumas dessas includes do fonte.
Pra ter certeza disso há 3 opções:
- Verificar o .PPO se estiver compilando com a opção /p (e coloca aqui pra gente dar uma olhada)
- Retirar todas as includes e verificar se funciona. Se funcionar, coloque 1 por 1 pra ver qual está com o problema
- Revisar as includes e verificar qual tem a redefinição desse comando.

[]'s

Ana