xharbour tem suporte a video 50 x 80?

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

Moderador: Moderadores

Avatar do usuário
ANDRIL
Usuário Nível 5
Usuário Nível 5
Mensagens: 1298
Registrado em: 06 Jul 2004 00:44
Contato:

xharbour tem suporte a video 50 x 80?

Mensagem por ANDRIL »

Pessoal tenho um sistema em Clipper 5.2e que usa uma resolução especial em modo texto 50 x 80 atraves da xSetMode.LIB. Como o sistema foi todo desenvolvido assim, nao tem como usar outro modo de tela.

No Clipper tem a função SetMode( 50,80 ) porem nao consegue alterar para este modo de vídeo, agora com a xSetMode ja consigo isso na mesma maquina.

Alguem saberia me informar se no xharbour 1.0.0 que a versao que eu tenha aqui eu consigo ativar este modo de tela, e como faria isso e principalmente, será que funciona?

Notei que a xSetMode.LIB tem incompatibilidade com chipsets da NVIDIA e tambem pretendo usar o xharbour para quem sabe usar as DLLs dos fabricantes de ECF.

No aguardo,
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
Avatar do usuário
Toledo
Administrador
Administrador
Mensagens: 3133
Registrado em: 22 Jul 2003 18:39
Localização: Araçatuba - SP
Contato:

Re: xharbour tem suporte a video 50 x 80?

Mensagem por Toledo »

Andril, você vai conseguir e funciona sim. Veja o exemplo do manual:

Código: Selecionar todos

#include "Inkey.ch"
PROCEDURE Main
LOCAL nMaxRow := MaxRow()+1
LOCAL nMaxCol := MaxCol()+1
CLS
DO WHILE LastKey() <> K_ESC
  @ 1,1 SAY "Enter MaxRow:" GET nMaxRow PICTURE "999"
  @ 2,1 SAY "Enter MaxCol:" GET nMaxCol PICTURE "999"
  READ
  CLS
  IF SetMode( nMaxRow, nMaxCol )
    ? "New MaxRow()", MaxRow()+1
    ? "New MaxCol()", MaxCol()+1
  ELSE
    ? "Unable to set new screen mode"
  ENDIF
  WAIT
  CLS
ENDDO
RETURN
As combinações permitidas são: 25,80 | 43,80 | 50,80 | 60,80 | 25,132 | 43,132 | 50,132 | 60,132.

Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: xharbour tem suporte a video 50 x 80?

Mensagem por Maligno »

Esse modo de vídeo, assim como vários outros, depende da placa de vídeo e não do software. Há um padrão internacional, solenemente ignorado por vários fabricantes. Cada qual pode dar suporte a vários modos diferentes. Por isso, não se espante se funcionar em um computador e em outro não.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar do usuário
Toledo
Administrador
Administrador
Mensagens: 3133
Registrado em: 22 Jul 2003 18:39
Localização: Araçatuba - SP
Contato:

Re: xharbour tem suporte a video 50 x 80?

Mensagem por Toledo »

Bom, aqui no meu micro funcionou certinho... fiz um teste no notebook e também funcionou. Então Andril, compile o exemplo que passei e faça um teste ai no seu micro.

Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Avatar do usuário
ANDRIL
Usuário Nível 5
Usuário Nível 5
Mensagens: 1298
Registrado em: 06 Jul 2004 00:44
Contato:

Re: xharbour tem suporte a video 50 x 80?

Mensagem por ANDRIL »

Obrigado Toledo e Maligno pelas respostas, vou testar e dou um retorno.

Grato.
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: xharbour tem suporte a video 50 x 80?

Mensagem por Maligno »

Sendo 80 colunas é mais fácil de funcionar. Ainda assim, eu não arriscaria manter os desenhos de tela nessa quantidade de linhas. O ideal, a meu ver, é abandonar o modo texto de uma vez, ou ao menos manter-se no padrão 80x25. Até porque, um dia o colega terá de "encarar" o modo gráfico mesmo. E sendo essa transição inevitável, não me parece muito sensato dedicar-se a um modo texto "diferente". Minha opinião.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar do usuário
ANDRIL
Usuário Nível 5
Usuário Nível 5
Mensagens: 1298
Registrado em: 06 Jul 2004 00:44
Contato:

Re: xharbour tem suporte a video 50 x 80?

Mensagem por ANDRIL »

Testei aqui em um win98 e winXP e funcionou. Notei que quando a tela esta inteira ele bloqueia algumas opções mais a 50 x 80 aceita.

Por desencargo, compilei no Clipper5.2e e funcionou tambem. Acho que foi pq instalei outros drivers de video, o programa foi desenvolvido antes de ter dado problema no meu PC, me lembro perfeitamente que naquela nao funcionava o SETMODE puro do clipper, até pq tive que mudar todo o sistema para uso do xSetMode.

Agora estou sem nenhuma maquina aqui com chipset NVIDIA que controla o video, gostaria muito de testar o exemplo e ter certeza que aceitaria.

Abraços
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
Avatar do usuário
ANDRIL
Usuário Nível 5
Usuário Nível 5
Mensagens: 1298
Registrado em: 06 Jul 2004 00:44
Contato:

Re: xharbour tem suporte a video 50 x 80?

Mensagem por ANDRIL »

Maligno, concordo com suas palavras, porem nao vou migrar este sistema para modo gráfico. Novos já estou desenvolvendo em modo gráfico. O que realmente me intriga é que no chipset da NVIDIA nao aceita. Até hoje, só observei este problema neste.

Obrigado.
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: xharbour tem suporte a video 50 x 80?

Mensagem por Maligno »

Pois na minha placa nVidia funciona. Mas é assim mesmo: isso sempre vai depender do hardware. Haverá sempre algum caso em que o modo não será suportado. Antigamente eu usava o modo 132x30. Mas já prevendo problemas de compatibilidade, eu já preparava o programa para usar tanto esse modo especial quanto o 80x25, comutando automaticamente. Só trabalhava com esses dois modos. Esse esquema sempre funcionou bem. Mas alguns tinham mais espaço, conforme a placa de vídeo. O importante é que eu não tinha dor de cabeça. :)
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Mário Isa
Usuário Nível 4
Usuário Nível 4
Mensagens: 907
Registrado em: 07 Jul 2004 13:54
Localização: Ilha Solteira-sp

Re: xharbour tem suporte a video 50 x 80?

Mensagem por Mário Isa »

Andril disse:
Novos já estou desenvolvendo em modo gráfico.
Andril,
qual linguagem/biblioteca vc escolheu para desenvolver os novos ?

Mário
Responder