![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
![]() hola!
Pos lo dicho, ¿Cómo puedo imprimir cadenas con acentos en una impresora de tickets? lo estoy probando en una SAMSUNG SRP-250AP, pero me gustaría que fuera general, ya que la aplicación que estoy desarrollando debe poder utilizar los distintos tipos de impresoras de tickets estandars disponibles. muchas gracias |
#2
|
|||
|
|||
![]() ya lo he solucionado. Os dejo la sólución para los que tengan el mismo problema que yo
![]() Código:
(****************************************) (* Convertimos una cadena AnsiStr a OEM *) (****************************************) function StrToOem(const AnsiStr: string): string; begin SetLength(Result, Length(AnsiStr)); if Length(Result) > 0 then CharToOem(PChar(AnsiStr), PChar(Result)); end; ... procedure imprimeTicket(numTicket : integer); ... s := StrToOem(obtenDatosEmpresa(EMP_NOMB))+chr(13)+chr(10); WritePrinter(Handle, pchar(s), Length(S), N); ... ![]() Salu2 |
#3
|
|||
|
|||
sin complicaciones
hola xavales!
os veo bastante liados con los codigos y tal , yo como no soy tan experto como vosotros me limite a descargarme drivers nuevos y me lo ace solo :P mirar este link http://feniximvico.com/categorias.ph...78&ididioma=ES seguro k os ayuda mucho. adiosssssssssss |
#4
|
|||
|
|||
Cita:
Excelente solución me sirvio demasiado... para mis impresiones de ticket. Gracias |
![]() |
|
|
![]() |
|