Fecha actual Jue Mar 28, 2024 4:15 pm

Todos los horarios son UTC + 1 hora [ DST ]




Nuevo tema Responder al tema  [ 7 mensajes ] 
Autor Mensaje
NotaPublicado: Sab Jul 25, 2020 6:49 pm 
Avatar de Usuario

Registrado: Mar Oct 11, 2005 6:58 pm
Mensajes: 135
Ubicación: España
Los archivos "MBP" los imprimo de maravilla, pero los "JPG" no puedo conseguir imprimirlos, ya que siempre me da error. haber si alguno de vosotros me puede hechar una mano y poner un ejemplo practico.

Saludos a los pocos que quedamos por aqui.

Fraguibo


Arriba
 Perfil  
Responder citando  
NotaPublicado: Lun Ago 31, 2020 10:14 am 
Avatar de Usuario

Registrado: Dom Oct 09, 2005 11:26 am
Mensajes: 362
Ubicación: Salamanca - España
Fraguibo escribió:
Los archivos "MBP" los imprimo de maravilla, pero los "JPG" no puedo conseguir imprimirlos, ya que siempre me da error. haber si alguno de vosotros me puede hechar una mano y poner un ejemplo practico.

Saludos a los pocos que quedamos por aqui.

Fraguibo


Hola. Pon algún ejemplo del código que te falla

_________________
Un saludo.
Jesús P. Melgar Velasco


Arriba
 Perfil  
Responder citando  
NotaPublicado: Mar Sep 01, 2020 7:42 pm 
Avatar de Usuario

Registrado: Mar Oct 11, 2005 6:58 pm
Mensajes: 135
Ubicación: España
Jesus aqui te adjunto la opción de imprimir, he chale un vistazo para ver que es lo que tengo mal, ya que las imagenes "BMP" me las imprime correctamente, pero las imagenes "JPG" me bloquean el programa y me da error.

Un saludo y gracias por tu colaboración

Fraguibo


Adjuntos:
Opciom de imprimir.txt [990 Bytes]
115 veces
Arriba
 Perfil  
Responder citando  
NotaPublicado: Mié Sep 02, 2020 10:47 am 
Avatar de Usuario

Registrado: Mar Dic 27, 2005 2:58 pm
Mensajes: 75
Fraguibo escribió:
Jesus aqui te adjunto la opción de imprimir, he chale un vistazo para ver que es lo que tengo mal, ya que las imagenes "BMP" me las imprime correctamente, pero las imagenes "JPG" me bloquean el programa y me da error.

Un saludo y gracias por tu colaboración

Fraguibo

Estás usando la clase TBitmap:
oBitmap:=TBitmap():Create()

Esa clase no tiene no tiene ninguna propiedad 'Picture':

Do Case
Case cExt=="BMP"
oBitmap:Picture:BMP:Filename:=x19
Case cExt=="JPG"
oBitmap:Picture:JPG:FileName:=x19
Endcase

Te tiene que dar error al ejecutar, si miras la ayuda en la web verás que tu clase es la clase TPicture, con esta clase te funcionará.


Arriba
 Perfil  
Responder citando  
NotaPublicado: Mié Sep 02, 2020 7:10 pm 
Avatar de Usuario

Registrado: Mar Oct 11, 2005 6:58 pm
Mensajes: 135
Ubicación: España
Alberto, gracias por tu respuesta, pero con "TPicture" tampoco me funciona, debe de haber otra forma para que imprima las imagenes "JPG", aver si bruno da señales de vida y nos da alguna idea al respecto.

Un saludo.

Fraguibo


Arriba
 Perfil  
Responder citando  
NotaPublicado: Jue Sep 03, 2020 10:26 am 
Avatar de Usuario

Registrado: Mar Dic 27, 2005 2:58 pm
Mensajes: 75
Fraguibo escribió:
Alberto, gracias por tu respuesta, pero con "TPicture" tampoco me funciona, debe de haber otra forma para que imprima las imagenes "JPG", aver si bruno da señales de vida y nos da alguna idea al respecto.

Un saludo.

Fraguibo

Me parece que has investigado poco, que fácil es decir 'no funciona' y que otro te de la solución, te mando un ejemplo donde se imprime una imagen bmp y otra jpg con la clase TPicture.


Adjuntos:
Preview.zip [481.22 KiB]
137 veces
Arriba
 Perfil  
Responder citando  
NotaPublicado: Lun Sep 07, 2020 1:35 pm 
Avatar de Usuario

Registrado: Mar Oct 11, 2005 6:58 pm
Mensajes: 135
Ubicación: España
Alberto, en primer lugar gracias por el ejemplo que me has mandado, el cual me ha ayudado bastante, pero al intentar acoplarlo a mi programa continuaba sin imprimir los archivos "JPG", a unque en tu ejemplo si se que imprimen, así que despues investigar bastante y hacer barias pruebas, he conseguido que mi programa tambien imprima los los archivos "JPG" y los "BMP", a qui te mando la solución:

oPicture := TPicture():Create()

// oPicture:Bitmap:FileName := x19
// Printer:DrawBitmap( oPicture:Bitmap:Handle, { 24, 20, 163, 256 } )
oPicture:Jpeg:FileName := x19
Printer:DrawBitmap( oPicture:Jpeg:Handle, { 24, 20, 163, 256 } )

Se elimina todo lo que hace referencia a "Bitmap" y se daja solamente lo que hace referencia a "JPG" y así imprime los dos tipos de archivos "JPG" y los "BMP" por separado.

Un saludo y hasta la proxsima que nos podamos ayudar.

Fraguibo


Arriba
 Perfil  
Responder citando  
Mostrar mensajes previos:  Ordenar por  
Nuevo tema Responder al tema  [ 7 mensajes ] 

Todos los horarios son UTC + 1 hora [ DST ]


No puede abrir nuevos temas en este Foro
No puede responder a temas en este Foro
No puede editar sus mensajes en este Foro
No puede borrar sus mensajes en este Foro
No puede enviar adjuntos en este Foro

Buscar:
Saltar a:  
cron