PC Toledo

Os chamados consoles ou terminais do windows estão em mudança, é mais seguro trabalhar com pseudoterminais. É possível obter ótimos resultados em interfaces de usuário modo texto.


config.prg

Eu uso o HB_GT_WVT_DEFAULT e tem dado certo para mim.
o HBGTINFO.CH tem um monte de configurações que ...

No YouTube tem uma playlist que mostra como converter Clipper para Harbour gráfico, e também mostra como converter DBF para MySQL.

https://youtu.be/CXU8brfnoqM?si=xRFkzqQqlPRfWRNC



Abçs.
( cap.anilto@gmail.com )

menu2.png menu_anilto.zip Os terminais (consoles) do windows estão em constante mudança, então nada é certo.
Lá pelos anos 2003 eu adaptei o MENUSYS do Clipper 5.3b, com a ajuda do livro do Rick Spence, para que funcionasse no Windows da época. Agora eu estava revisando esse MENUSYS e adaptando ...

É possível rodar rotinas Harbour dentro de programas em C ou C++?
Eu sei que é possível ter rotinas escritas em C dentro de programas Harbour, gostaria de saber se o inverso é possível.

Acrescentei na função main, (editando no notepad++, formatado em ANSI), logo depois das chamadas hb_gtinfo os seguintes comandos:

HB_LANGSELECT('PT')
HB_CDPSELECT('PTISO')

e compilei com

HBMK2 menu99 gtwvg.hbc

A acentuação ficou correta, o programa encerrou normalmente com a tecla ESC.

Copiei o texto do código e percebi que alguns includes estão com um espaço depois do síbolo #. Isso pode gerar erros.

No Clipper 5.3, o Achoice usa recursos do GETSYS, cujo código fonte está no SOURCE do Clipper. Já está preparado para o mouse, mas para isso precisa acrescentar a biblioteca llibg. (Não lembro bem como usei isso em 1999)
Só que funciona no DOS, mas não no windows. No windows é necessário acrescentar ...

Para usar o Achoice() com mouse, só precisa setar o contexto correto, que, no aso do windows é HB_GT_WVT.
Se usar HB_GT_WIN, o mouse não funciona.

Exemplo:

/* AChoice com mouse

Compilar com HBMK2 MOUSE02 HBCT.HBC

O Programa original:
#include "inkey.ch" // Key definitions
REQUEST HB_GT ...

Acabei encontrando uma solução para HB_GT_WVT (não sei se funciona em outros modos;

aPal := { 0x2E1436, 0xEDD400, 0xF57900, 0xC17D11, 0x730216, 0x3465A4, ;
0x755078, 0xCC0000, 0xD3D7CF, 0x555753, 0xFCE94F, 0x729FCF, ;
0xCE5C00, 0x5C3566, 0x440000, 0xEEEEEC }
HB_GtInfo( HB_GTI_PALETTE, aPal)

Lá pelos idos de 2003 andei fazendo umas modificações no Menusys do clipper para que ele tratasse melhor os eventos do mouse. Como não consegui enviar os PRGs por aqui, publiquei no seguinte link: https://www.linguagemclipper.com.br/content/modificando-o-menusys-do-harbour-e-clipper-53-2
O arquivo ...

O modo HB_GT_WVT traz para o console algumas funções úteis, como modificar a fonte do texto, localização, páginas de código. Tem alguma função que modifique as cores padrão? Ou alguma biblioteca específica para isso? Algo como o antigo VGAPAlette() do CATools?

O código abaixo compila no harbour 3.2 com windows 10, porém não assume o mouse do windows:

#include "inkey.ch"

Function Main()

SET EVENTMASK TO HB_INKEY_ALL

While LastKey() != K_ESC

Clear Screen
DispBox( 0, 1, 2, MaxCol(), Nil, "GR+/N" )
DispBox( 3, 1, MaxRow(), MaxCol(), Nil, "G+/N ...