Aiuto con Printer...

[masterix21]

Parto con il dire che ho cercato in tutto il forum (infatti ho capito come stampare ;Pp) ma non ho trovato nulla.

allora... ho alcune domande da porre.

1) Come faccio a far stampare dei dati senza ke la stampa mi parta a pochi millimetri dal bordo? voglio almeno 2 cm d distanza (altezza) e 1,5 cm di larghezza. Questo per quanto riguarda la squadratura... (aiutatemi plZ).

2) Come faccio a far stampare un'immagine?


ecco come avevo provato io:

Printer.FontSize = 10
Printer.Font = "Verdana"
Printer.Print ""
Printer.Print ""
Printer.Print "Nome Azienda: " & txt_nomeazienda.Text
Printer.Print "Codice Fiscale: " & txt_codicefiscale.Text
Printer.Print "Partita Iva: " & txt_partitaiva.Text
Printer.Print "Indirizzo: " & txt_indirizzo.Text
Printer.Print "_________________________________________________"
Printer.Print ""
Printer.Print "Telefono: " & txt_telefono.Text
Printer.Print "Fax: " & txt_fax.Text
Printer.Print "Cellulare: " & txt_cellulare.Text
Printer.Print "_________________________________________________"
Printer.Print ""
Printer.Print "Altro: " & txt_altro.Text
Printer.Print ""
Printer.Print ""
Printer.EndDoc

Vi prego... aiutatemi ;|


P.S.: ultima cosa... come si fa x far stampare la stampante a bozza, normale o ottimale utilizzando Printer?? Come si usa PrintQuality?

[Gugu]

Ciao,
ti faccio qualche esempio di come utilizzare l'oggetto printer:

[B]per posizionarti dove vuoi:[\B]
Printer.CurrentX = 8500
Printer.CurrentY = 2000

[B]per cambiare il font:[\B]
Printer.FontSize = 10
Printer.Font = "Tahoma"
Printer.FontBold = False

[B]per stampare una immagine:[\B]
Call Printer.PaintPicture(Image1.Picture, 700, 500)

[B]per gestire la qualità di stampa:[\B]
Printer.PrintQuality = vbPRPQDraft '--> Draft resolution
Printer.PrintQuality = vbPRPQLow '--> Low resolution
Printer.PrintQuality = vbPRPQMedium '--> Medium resolution
Printer.PrintQuality = vbPRPQHigh '--> High resolution

Ti ricordo inoltre che con il commondialog puoi richiamare le impostazioni delle stampanti installate e modificarne le proprietà.

Se non ti basta.. sono qua!
Ciao
Gugu

[masterix21]

[B]per posizionarti dove vuoi:[\B]
Printer.CurrentX = 8500
Printer.CurrentY = 2000

ma è in pixel? Ad esempio, con i numeri ke hai messo tu... dove mi posiziono?

[vonkranz]

Originariamente inviato da masterix21
ma è in pixel? Ad esempio, con i numeri ke hai messo tu... dove mi posiziono?

Dipende dall prop. Printer.ScaleMode:

Printer.ScaleMode =

VbTwips (Predefinita)Twip (1440 twip per pollice logico; 567 twip per centimetro logico).

VbPoints Punti (72 punti per pollice logico).

VbPixels Pixel (unità di misura minima per la risoluzione di un monitor o di una stampante).

VbCharacters Caratteri (orizzontale = 120 twip per unità; verticale = 240 twip per unità).

VbInches Pollici.

VbMillimeters Millimetri.

VbCentimeters Centimetri.

...ti ho riportato solo le piu' significative.

[masterix21]

ottimo *

[elfocaotico]

Wow grazie anche da parte mia