bitmap con tprinter

Post Reply
Marcelo Via Giglio
Posts: 1033
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

bitmap con tprinter

Post by Marcelo Via Giglio »

Hola,

hay alguna manera de poner un grafico (bitmap) con Tprinter que salga proporcionalmente igual en cuaquier impresora, ni mas grande ni mas chico segun los DPI de la impresora.

saludos

Marcelo
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Marcelo,

Supongo que al llamar a <oPrn>:SayBitmap() habrá que proporcionarle las dimensiones en base a la resolución de la impresora, para que siempre se vea proporcional.
regards, saludos

Antonio Linares
www.fivetechsoft.com
Marcelo Via Giglio
Posts: 1033
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

Post by Marcelo Via Giglio »

Gracias Antonio,

por alli esta la cosa, lo que pasaba era que estuve probando con vallores peque~nos para nWidth y nHeith, y la imagen no se transformaba o por ultimo desaparecia, pero haciendo uso de oPrn:nVertRes() oPrnHorzRes() y valores proporcionales a ellos todo esta ok

Gracias

Marcelo
fleal
Posts: 234
Joined: Tue Oct 25, 2005 12:39 am
Location: México, DF

Post by fleal »

Marcelo,
Algún pequeño ejemplo de como lo estas usando por favor.

Gracias
Fernando
R.F.
Posts: 840
Joined: Thu Oct 13, 2005 7:05 pm

Post by R.F. »

Marcelo Via Giglio wrote:por alli esta la cosa, lo que pasaba era que estuve probando con vallores peque~nos para nWidth y nHeith, y la imagen no se transformaba o por ultimo desaparecia, pero haciendo uso de oPrn:nVertRes() oPrnHorzRes() y valores proporcionales a ellos todo esta ok
Estas matando pulgas a cañonazos.... el objeto printer trae un metodo que coniverte Centimetros a puntros de la impresora con la que estes imprimiendo, asi que vamos a suponer que quieres un bitmap de 5x5 cms colocado a los 10 cm, 10 cm del borde superior izqauierdo:

Hacemos esto:

Code: Select all

aPos := oPrinter:Cmtr2Pix(10,10)
aTam := oPrinter:Cmtr2Pix(5,5)

oPrinter:SayBitmap(aPos[1],aPos[2],nombrebitmap, aTam[1],aTam[2])
y listo, de esta forma siempre tendras el bitmap en la misma posicon.
Saludos
R.F.
Marcelo Via Giglio
Posts: 1033
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

Post by Marcelo Via Giglio »

fleal wrote:Marcelo,
Algún pequeño ejemplo de como lo estas usando por favor.

Gracias
Fernando
Lo hago exactamente como lo dice RF, tomandos las medidas en centimetros
Verhoven
Posts: 435
Joined: Sun Oct 09, 2005 7:23 pm

Post by Verhoven »

¿Tiene que tener alguna característica especial el archivo bmp? Porque no me sale ni en el preview ni en la impresora.

Saludos.
Marcelo Via Giglio
Posts: 1033
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

Post by Marcelo Via Giglio »

Hola,

no, tan solo debe estar en tu archivo de recurso o si lo deseas lo puedes tener como un archivo externo "file.bmp" en _ el codigo no varia o lo llamas con el nombre de recurso o con el nombre de archivo desde el metodo :saybitmap de la clase printer.

Ahora si utilizas report no he conseguido que se imprima desde recurso tan solo desde archivo, y eso no lo entiendo siendo que la clase report utiliza la clase printer.

saludos

Marcelo
Verhoven wrote:¿Tiene que tener alguna característica especial el archivo bmp? Porque no me sale ni en el preview ni en la impresora.

Saludos.
YamilBracho
Posts: 33
Joined: Mon Oct 17, 2005 11:56 pm
Location: Caracas, Venezuela

Post by YamilBracho »

Gracias por reactivar el sitio pero algunos link no funcionan...
Post Reply