Jan, creo haber entendido:Jan Ribeiro wrote:Fernando Chirico
Imprimo carater um por vez.
Quando encontro * no array quero imprimir "▄".
A mi criterio lo que tienes que hacer es esto...
oObjPrt:printdata( nLinha, nColuna, HB_OemToAnsi( chr(220) ) )
o prueba
oObjPrt:printdata( nLinha, nColuna, HB_OemToAnsi("▄") )
La función HB_OEMTOANSI() es propia de Harbour, tu no tienes que declarar nada ( ya que usas el HMG Oficial ), solamente debes utilizarla.
Espero que solucione tu problema.
Saludos, Fernando Chirico.