campo memo no Harbour

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

cjp
Usuário Nível 6
Usuário Nível 6
Mensagens: 1563
Registrado em: 19 Nov 2010 22:29
Localização: paraná
Contato:

campo memo no Harbour

Mensagem por cjp »

Pessoal, passei a usar o Harbour recentemente (usava o xHarbour antes), e estou tendo o problema com um campo memo: a variável, mesmo digitada pelo usuário, fica em branco.

Estou usando assim:

Código: Selecionar todos

            @ maxrow()-7,5 say "Digite a resposta; tecle CTRL-W quando terminar"
            dispbox(maxrow()-6,0,maxrow(),maxcol())
            rsp:=memoedit(rsp,maxrow()-5,1,maxrow()-1,maxcol()-1,.t.)
            rsp:=memotran(rsp,"","")
            rsp=substr(rsp,1,at("        ",rsp))
Sempre fiz assim no xharbour e funcionava.

Mas agora, com o Harbour, não importa o que o usuário digite, o rsp sempre fica em branco.

Será que é preciso mudar alguma coisa?
Inacio de Carvalho Neto
Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

campo memo no Harbour

Mensagem por Jairo Maia »

Olá Inácio,

Tente remover a última linha do código que você postou.
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
cjp
Usuário Nível 6
Usuário Nível 6
Mensagens: 1563
Registrado em: 19 Nov 2010 22:29
Localização: paraná
Contato:

campo memo no Harbour

Mensagem por cjp »

Realmente, meu caro, o problema estava na última linha.

No xharbour, essa última linha era necessária, porque ele acrescentava caracteres estranhos na resposta, ao fim de cada linha, o que parece que não acontece no harbour.

Muito obrigado.

Inacio
Inacio de Carvalho Neto
Responder