Função ALERT() não "respeita" SETMODE(25,40)(Gambi

[Dércio_Luiz_Zanatta]

Depois que compilei um sistema com Xharbour, pude notar que as msg mostradas com ALERT não respeitam a delimitação da tela qdo setada para 25 linhar e 40 colunas.. Ele mostra sempre como se estivesse usando 80 colunas.
Até já fiz outra função para substituir o Alert, mas os erros do do clipper continuam mostrando no alert.
alguém sabe como fazer para o alert respeitar o setmode(25,40) no xharbour ?

[Dércio_Luiz_Zanatta]

Depois de muito tentar achar a solução para o problema, cheguei a conclusão que isso é mais um BUG de compatibilidade entre o Xharbour X Clipper.
NÃO ESTOU RECLAMANDO DE NADA. Acho que seria muito bom para ser verdade poder usar os mesmos programas em clipper para compilar em 32 bits sem nenhum BUG.
Contornei esse problema criando uma função que simula o ALERT, com uma limitação para 40 colunas e alterei o ERRORSYS.PRG, colocando uma cláusula que continua usando o Alert qdo a tela tem mais de 40 colunas e a minha função quando tem menos de 40 colunas.
De qualquer forma, se alguém conseguir fazer o ALERT respeitar o número de colunas, por favor, poste aqui..
Um abraço.

[Itamar M. Lins Jr.]

Depois de muito tentar achar a solução para o problema, cheguei a conclusão que isso é mais um BUG de compatibilidade entre o Xharbour X Clipper.
NÃO ESTOU RECLAMANDO DE NADA. Acho que seria muito bom para ser verdade poder usar os mesmos programas em clipper para compilar em 32 Um abraço.

Ola!
Qual é a versão do xharbour ?

-----------------------8<-----------------------
2007-01-09 22:05 UTC-0300 Eduardo Fernandes <modalsist@yahoo.com.br>
* source/rtl/tget.prg
! fixed parsepict() method to protect ::lCleanzero value, used in
"@Z" picture.

* source/rtl/alert.prg
! fixed to use CT windows functions to display alert box, if any
is in use.
---------------------------->8---------------

Saudações
Itamar M. Lins Jr.

[Dércio_Luiz_Zanatta]

versão 0.99.70

[sygecom]

Fiz um pequeno teste aqui com a versão 9970 e funcionou tudo certinho, please demonstre um pequeno exemplo para nos poder compilar e ver o problema.

[Dércio_Luiz_Zanatta]

function main()
CLEAR

SETMODE(25,40)

ALERT("12345678901234567890123456789012345678901234567890123456789012345678901234567890")
SETMODE(25,80)
[/code]