function main
? [Teste acentuação...]
inkey(0)
quit
Estou usando o notepad++ e gostaria que do jeito que eu escrevesse nele, saísse no programa, mas não sai nem com reza braba...
Alguém poderia me ajudar a fazer esse simples programinha acima, escrever do mesmo jeitinho que está no editor?
Uso Harbour 3.0, e compilo em modo janela do windows. Segue o hbp para análise... Agradeço a ajuda...
#NOME DE SAIDA SO EXECUTAVEL
-otst
-w0 -es2
-mt
#compilacao Incremental
#-inc
# comprime o executavel (necessita de UPX)
-compr=yes
# BIBLIOTECA PARA COMPILAR EM MODO CONSOLE
-gtwvt
-gui
#BIBLIOTECAS AUXILIARES AQUI ESTA A ANTIGA CT DO CLIPPER 5.2 /5.3
-lhbct
#A PARTIR DAQUI VC COLOCA SEUS PRGS
tst.prg
A acentuação, essa FDP. "Helpem" me...
Moderador: Moderadores
-
Eduardo Pinho
- Colaborador

- Mensagens: 72
- Registrado em: 13 Jun 2014 19:30
- Localização: Niteroi
- JoséQuintas
- Administrador

- Mensagens: 20267
- Registrado em: 26 Fev 2007 11:59
- Localização: São Paulo-SP
A acentuação, essa FDP. "Helpem" me...
Tem que deixar a mesma codepage nos dois.
Se usar o default UK do Clipper/Harbour, vai ter que deixar o mesmo no editor.
Geralmente a codepage default do Windows é PT_BR, então a opção é usar a mesma no Harbour e no editor - mas nem sei se o 3.0 tem isso.
Se usar o default UK do Clipper/Harbour, vai ter que deixar o mesmo no editor.
Geralmente a codepage default do Windows é PT_BR, então a opção é usar a mesma no Harbour e no editor - mas nem sei se o 3.0 tem isso.
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/
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/
-
Eduardo Pinho
- Colaborador

- Mensagens: 72
- Registrado em: 13 Jun 2014 19:30
- Localização: Niteroi
A acentuação, essa FDP. "Helpem" me...
Obrigado Quintas...
Mas como faço isso? A configuração de codepage do notepad++ é aquela que a gente escolhe ANSI ou UTF, essas coisas? Foi a unica que achei... Botei Ansi, será que é isso?
E a configuração de codepage do Windows eu escolho no meu .prg ou defino no Windows? To perdido... rs...
Abcs
Mas como faço isso? A configuração de codepage do notepad++ é aquela que a gente escolhe ANSI ou UTF, essas coisas? Foi a unica que achei... Botei Ansi, será que é isso?
E a configuração de codepage do Windows eu escolho no meu .prg ou defino no Windows? To perdido... rs...
Abcs
- JoséQuintas
- Administrador

- Mensagens: 20267
- Registrado em: 26 Fev 2007 11:59
- Localização: São Paulo-SP
A acentuação, essa FDP. "Helpem" me...
ANSI significa o padrão tradicional usando tabela ASCII.
Justamente a tabela ASCII é diferente pra cada idioma.
O editor assume a mesma do Windows que é PT_BR.
No Harbour uso:
Isso deixa tudo no padrão Windows PT_BR.
Tem gente que configura padrão espanhol, pra poder usar aqueles Chr(196), etc.
Importante:
isso configura tudo pro PT_BR, TUDO.
Se gravou no banco de dados antes com UK, não vai corrigir o banco de dados.
O mesmo se digitou antes no fonte usando UK.
Mas acerta daqui pra frente.
Justamente a tabela ASCII é diferente pra cada idioma.
O editor assume a mesma do Windows que é PT_BR.
No Harbour uso:
Código: Selecionar todos
REQUEST HB_CodePage_PTISO
PROCEDURE Main
Set( _SET_CODEPAGE, "PTISO" )
Tem gente que configura padrão espanhol, pra poder usar aqueles Chr(196), etc.
Importante:
isso configura tudo pro PT_BR, TUDO.
Se gravou no banco de dados antes com UK, não vai corrigir o banco de dados.
O mesmo se digitou antes no fonte usando UK.
Mas acerta daqui pra frente.
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/
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/
-
Eduardo Pinho
- Colaborador

- Mensagens: 72
- Registrado em: 13 Jun 2014 19:30
- Localização: Niteroi
A acentuação, essa FDP. "Helpem" me...
Quintas, você é o cara, finalmente essa bagaça escreveu certo.
Grato pela ajuda.
Abcs
Grato pela ajuda.
Abcs
-
Eduardo Pinho
- Colaborador

- Mensagens: 72
- Registrado em: 13 Jun 2014 19:30
- Localização: Niteroi
A acentuação, essa FDP. "Helpem" me...
Quintas,
Com o PTISO funcionou mas não tem realmente os caracteres antigos que eu usava pra frame tipo o 196 que você citou.
Com o espanhol nao deu nao, tem os caracteres frame, mas a acentuação e cedilha nao ficava certo.
Aí fui tentando outros e consegui com o ITISB. Bate as acentuações com o Windows e notepad++ e ainda tem os caracteres antigos de frame.
No final assim ficou perfeito.
REQUEST HB_CodePage_ITISB
function main
Set( _SET_CODEPAGE, "ITISB" )
Valeu, abcs.
Com o PTISO funcionou mas não tem realmente os caracteres antigos que eu usava pra frame tipo o 196 que você citou.
Com o espanhol nao deu nao, tem os caracteres frame, mas a acentuação e cedilha nao ficava certo.
Aí fui tentando outros e consegui com o ITISB. Bate as acentuações com o Windows e notepad++ e ainda tem os caracteres antigos de frame.
No final assim ficou perfeito.
REQUEST HB_CodePage_ITISB
function main
Set( _SET_CODEPAGE, "ITISB" )
Valeu, abcs.
A acentuação, essa FDP. "Helpem" me...
Olá Eduardo,
Eu mudei meu codepage aqui para "ITISB" e a tela ficou acentuada corretamente, mas eu queria alertá-lo para o index usando o "descend" fica errado.
Exemplo:
index on descend(CAMPO1) to _TMP
Este "CAMPO1" é caractér de 8 e guardo nele um campo data usando o Dtos()
Isto parou de funcionar, então voltei para o codepage "PT850".
Abraço,
Rossine.
Eu mudei meu codepage aqui para "ITISB" e a tela ficou acentuada corretamente, mas eu queria alertá-lo para o index usando o "descend" fica errado.
Exemplo:
index on descend(CAMPO1) to _TMP
Este "CAMPO1" é caractér de 8 e guardo nele um campo data usando o Dtos()
Isto parou de funcionar, então voltei para o codepage "PT850".
Abraço,
Rossine.
Rossine.
Harbour 3.4, MingW / Msvc, QT, Qt5xhb, GtQtc, DbfCdx, MySql/MariaDB.
Harbour 3.4, MingW / Msvc, QT, Qt5xhb, GtQtc, DbfCdx, MySql/MariaDB.
