Ordenar tamaño de impresión
Hola Martín, espero que estés bien.
Hace tiempo que no te doy el coñazo, y para no perder la costumbre...
¿Recuerdas el scroll de texto e imágenes?
¿Cómo puedo hacer para imprimir una imagen demasiado alta para el papel y que esta imagen no se reduzca?
Me explico:
El fallo está cuando imprime un member(que es una imagen texto+imagen).
Reduce todo al tamaño de un folio, quedando el texto enano enano.
¿Puedo decirle a que tamaño quiero que lo imprima? Sería lo mejor.
Saludos
bafi
Hace tiempo que no te doy el coñazo, y para no perder la costumbre...
¿Recuerdas el scroll de texto e imágenes?
¿Cómo puedo hacer para imprimir una imagen demasiado alta para el papel y que esta imagen no se reduzca?
Me explico:
El fallo está cuando imprime un member(que es una imagen texto+imagen).
Reduce todo al tamaño de un folio, quedando el texto enano enano.
¿Puedo decirle a que tamaño quiero que lo imprima? Sería lo mejor.
Saludos
bafi
1 respuesta
Respuesta de bedelludrica
1
¿Imprimir con que xtra?
Buenas Martín.
Perdona pero recorté la pregunta..
El xtra PrintoMatic lite
Gracias por la rapidez
Perdona pero recorté la pregunta..
El xtra PrintoMatic lite
Gracias por la rapidez
Con frames creo que es la mejor opciòn:
Te pongo un ejemplo completo:
On mouseUp me
instancia = new (xtra "PrintOMatic")
if not objectP(instancia) then
Alert "se ha producido un error en la instancia de la impresiòn."
else
Cursor 4
setDocumentName instancia, "lucas"
setMargins instancia, Rect(20,20,45,45)
ancho= getPageWidth( instancia)
alto =getPageHeight( instancia)
NewPage instancia
--Aquí reduces la imagen
NewFrame instancia, Rect(0,0,34,43), FALSE
append instancia, member "foto"
Cursor -1
PrintPreview instancia
-- else
-- if doJobSetup(instancia) = true then
-- updatestage
-- print instancia
-- end if
-- end if
instancia = 0
end if
end
Si necesitas un tutorial del printomatic tengo uno mio aquì:
http://www.geocities.com/bedelludrica/printomatic.zip
Te pongo un ejemplo completo:
On mouseUp me
instancia = new (xtra "PrintOMatic")
if not objectP(instancia) then
Alert "se ha producido un error en la instancia de la impresiòn."
else
Cursor 4
setDocumentName instancia, "lucas"
setMargins instancia, Rect(20,20,45,45)
ancho= getPageWidth( instancia)
alto =getPageHeight( instancia)
NewPage instancia
--Aquí reduces la imagen
NewFrame instancia, Rect(0,0,34,43), FALSE
append instancia, member "foto"
Cursor -1
PrintPreview instancia
-- else
-- if doJobSetup(instancia) = true then
-- updatestage
-- print instancia
-- end if
-- end if
instancia = 0
end if
end
Si necesitas un tutorial del printomatic tengo uno mio aquì:
http://www.geocities.com/bedelludrica/printomatic.zip
