Ti riferisci all'orientamento della pagina?
Tutte le impostazioni del pannello delle preferenze di stampa possono
essere salvate in forma di stringa attraverso la proprietà SetupString
(puoi conservarle ad esempio in un file di testo dopo la prima stampa)
e ripristinate per le stampe successive.
Qualcosa del genere:
'Stampa
Dim g as Graphics
Dim PageSetup As New PrinterSetup()
'Se non ci sono impostazioni di stampa valide apro la finestra di
impostazioni
If PageSettings.Trim() = "" And PageSetup.PageSetupDialog() Then
PageSettings = PageSetup.SetupString
'Salvo le impostazioni di stampa
Dim PrinterSettings As FolderItem = New FolderItem("")
PrinterSettings = PrinterSettings.Child("printer.cfg")
If PrinterSettings <> nil And PrinterSettings.IsWriteable Then
Dim t As TextOutputStream
t = PrinterSettings.CreateTextFile()
t.Write(PageSettings)
t.Close()
End If
End If
PageSetup.SetupString = PageSettings
g = OpenPrinterDialog(PageSetup)
On 13/feb/08, at 11:39, EnricoLr a Libero wrote:
Salve a tutti, una domandina...
è possibile impostare la stampa in orizzontale di default dal
comando PrinterSetup?
Ho provato a guardare il manuale ma non ho trovato il parametro, o
c'è qualche altro comando....
Sempre un grazie a tutti
Enrico
--
gilberto de faveri
omnidea srl
edificio pegaso
parco scientifico tecnologico vega
via delle industrie, 15
30175 venezia marghera
tel +39 041 509 3441
fax +39 041 509 3641
www.omnidea.it
|