Página 1 de 1

CHR(26) e CHR(27)

Enviado: 20 Dez 2009 09:25
por Hasse
Bom dia colegas.

Na época do Clipper eu usava os caracteres CHR(26) e CHR(27), -"seta para cima e seta para baixo"-, como instruções de navegação nos Prompt's, para os usuários.

No xHarbour estes caracteres são apresentados como pequenos quadrados.

Há alguma forma de implantar este recurso no xHarbour ?

Re: CHR(26) e CHR(27)

Enviado: 22 Dez 2009 18:05
por sygecom
Olá Hasse,
Na verdade ele continua funcionando, porém para ele continuar funcionando você não pode usar essas LIB que parecem tentar fazer o aplicativo ser meio grafico, como GTWVW,WVWTOOLS,GTWVG,GTWVT e etc... ou seja você não pode linkar em seu aplicativo a LIB GTGUI.LIB deve deixar a GTWIN.LIB.
Caso seja inevitavel o uso da GTGUI.LIB, então o jeito é fazer as setas aparecerem como imagem de .BMP

Re: CHR(26) e CHR(27)

Enviado: 22 Dez 2009 20:52
por Hasse
Boa noite Leonardo.

Esqueci de mencionar que trabalho em modo console, sem qualquer LIB gráfica ou semi-gráfica.

Re: CHR(26) e CHR(27)

Enviado: 22 Dez 2009 21:02
por sygecom
Post seu .BC para dar uma revisada.

Re: CHR(26) e CHR(27)

Enviado: 22 Dez 2009 21:16
por Hasse
Segue no anexo.

Re: CHR(26) e CHR(27)

Enviado: 22 Dez 2009 21:24
por sygecom
Olá Hasse,
Dei uma olhada e parece tudo certo, você usa alguma coisa da GTINFO() ? usa VL ?

Re: CHR(26) e CHR(27)

Enviado: 24 Dez 2009 17:40
por Hasse
Não uso nemVL nem GTINFO().

A única LIB que uso é a Lab_lib.lib de minha própria criação, e ela mesma também não usa qualquer lib.

Somente o xHarbour e seus recursos nativos.

Re: CHR(26) e CHR(27)

Enviado: 25 Dez 2009 13:25
por gvc
Isso deve ser configuração da tabela de caracteres. Veja qual a tabela vc esta usando.
Parece que o xHarbour permite configurar isso pelo sistema.

Re: CHR(26) e CHR(27)

Enviado: 01 Jan 2010 23:16
por Hasse
Olá GVC.

Uso assim:

Código: Selecionar todos

REQUEST HB_CODEPAGE_PT850
HB_SetCodePage( "PT850" )

Re: CHR(26) e CHR(27)

Enviado: 02 Jan 2010 23:27
por clodoaldomonteiro
Olá!
Eu uso a gtwvw e coloco a função WVW_SetCodePage(,255), mas ainda falta alguns caracteres originais do DOS .