Harbour unicode

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

Moderador: Moderadores

Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

Harbour unicode

Mensagem por Jairo Maia »

Agora sim. Certinho.

Apenas para registro: O comando é: hb_gtInfo( HB_GTI_COMPATBUFFER, .f. )

Show de bola...
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)
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Harbour unicode

Mensagem por JoséQuintas »

Tem razão, errei na hora de postar.

Próximas etapas:

- Acentuação em PDF e relatórios para textos do sistema (não cadastros ainda)
- Acentuação em DBFs, MySql, e tratamentos pra integração com outros sistemas (bancos por exemplo), e SPED

No caso de relatórios em matricial ou PDF, minha classe de relatório vai ajudar muito, cheguei a postar por aqui.
Como toda impressão é feita por uma única função:
DrawText( linha, coluna, texto, Picture, ... )
Provavelmente, ao descobrir uma solução vai ser só alterar esta função.

Mas usar para os dados cadastrados vai ser a mais delicada, porque pode afetar integrações, e vai ser a última.
E também porque depende de uma base de dadso compatível.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Harbour unicode

Mensagem por JoséQuintas »

Ainda não consegui encontrar o equivalente na Harupdf.

http://www.php.net/manual/en/haru.builtin.encodings.php

Alguma dica?
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
NIVALDOHARIM
Usuário Nível 1
Usuário Nível 1
Mensagens: 3
Registrado em: 20 Mai 2023 19:54
Localização: FORTALEZA / CEARÁ

Harbour unicode

Mensagem por NIVALDOHARIM »

Olá amigos,

Estou mexendo em um sistema meu feito em Clipper.
Estou passando para Harbour.
Estou com dificuldades para resolver acentuação e os comandos savescreen/restscreen.

Quando uso :

Código: Selecionar todos

   REQUEST HB_CodePage_UTF8 
   REQUEST HB_LANG_PT	 
   HB_CdpSelect( "UTF8" )
   hb_langSelect( "PT" )
acentua mas não restaura as telas de box. Coloca o sinal "?"
Olhei uma postagem sua no fórum Harbour unicode , e vi que José Quintas estava com a mesma dificuldade.
Já tentei usar hb_gtInfo( HB_GTI_COMPATBUFFER, .f. ), mas o Harbour não reconhece.

Estou usando o HMG.3.5
COMO FAÇO PARA COMPILAR COM ESTAS BIBLIOTECAS.

PODEM ME AJUDAAR ?
GRATO A TODOS
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Harbour unicode

Mensagem por JoséQuintas »

Código: Selecionar todos

#include "hbgtinfo.ch"
   hb_gtInfo( HB_GTI_COMPATBUFFER, .F. )
Mas depende do que significa: o harbour não reconhece.
Na versão 3.0 acho que isso não existia.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
NIVALDOHARIM
Usuário Nível 1
Usuário Nível 1
Mensagens: 3
Registrado em: 20 Mai 2023 19:54
Localização: FORTALEZA / CEARÁ

Harbour unicode

Mensagem por NIVALDOHARIM »

JOSÉ QUINTAS
Obrigado por responder.
Deu certo aqui. Estava faltando esse include que tu me enviaste.
Vou colocar aqui o código teste para que todos possam ver como exemplo.
Eu estava com dificuldades em acentuação e resolvi e aí ficou o problema de savescreen/restorescren. Mas agora ficou show.

Estou migrando um sistema de Clipper para Harbour na versão 3.5 e agora vou ajeitar os acentos.

Segue o código.

Código: Selecionar todos

#include "hbgtinfo.ch"

REQUEST HB_CodePage_UTF8
REQUEST HB_LANG_PT	 

PROCEDURE Main
   hb_gtInfo( HB_GTI_COMPATBUFFER, .F. )
   HB_CdpSelect( "UTF8" )
   hb_langSelect( "PT" )
   CLS
   @ 2, 2 SAY "AMAPÁ - CEARÁ - ESPÍRITO SANTO - GOIÁS - MARANHÃO - PARÁ - PARAÍBA - PARANÁ "
   @ 3, 2 SAY "PIAUÍ - RONDÔNIA - SÃO PAULO"
   @ 5, 2 SAY "Estes são os estados Brasileiros com acentos em seus nomes"
   @ 1, 1 TO 6, MaxCol()
   SAVE SCREEN
   Inkey(0)
   RESTORE SCREEN
   Inkey(0)
RETURN
Obrigado José Quintas pela gentileza.
Saudações
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Harbour unicode

Mensagem por JoséQuintas »

Veja se realmente vai querer usar UTF-8.
Isso altera todo uso de Substr() por exemplo.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
NIVALDOHARIM
Usuário Nível 1
Usuário Nível 1
Mensagens: 3
Registrado em: 20 Mai 2023 19:54
Localização: FORTALEZA / CEARÁ

Harbour unicode

Mensagem por NIVALDOHARIM »

OLÁ José Quintas.

Eu estou aos poucos convertendo um sistema de Clipper para Harbour., A cada
dia aprendo algo mais.

Eu usava o DBASE, MFOXPLUS E FOXPRO, para manipulação dos arquivos, só que
eles não rodam em arquitetura de 64 bits,

Tu tens algum GBD que tu possas indicar que faça as mesmas manipulações em
modo CONSOLE ?

Já tentei usar o HBRUN mas está um pouco difícil pois não sei comandos.

Se tu tiveres aí, podes me ajudar ?
Responder