PC Toledo

Mudei de TextBox para GetBox e verifiquei que os caracteres acentuados não saem corretamente, qual a instrução correta para resolver isso? Estou usando Harbour.

REQUEST HB_CODEPAGE_PTISO
HB_CDPSELECT('PTISO')

Usando o picture '@!' os caracteres acentuados saem em minúsculo como era no Clipper, ocasião em que alterei o GetSys para resolver...

Não conheço muito o GETBOX, mas pelo que eu sei, você poderia passar a converter tudo o que é digitado na propriedade ON CHANGE.

Softwhouse escreveu:Não resolveu

Fernando, aqui eu uso GETBOX com PICTURE "@!" e a acentuação sai corretamente!

No meu PRG principal, antes do Procedure Main() (ou Function Main), chamei REQUEST HB_CODEPAGE_PTISO e depois do Main coloquei HB_CDPSELECT('PTISO').
Abraços,

Toledo, comigo não funciona, fica assim: ALTERAçãO. Deve faltar ou ter alguma coisa errada no código.

Resolvido, removí isso:

set codepage to portuguese
set language to portuguese

Fernando, acho que bastava você retirar o "set codepage to portuguese" que já ia funcionar.

Abraços,