Newsgroup: it.comp.lang.visual-basic
Titolo: VB5 e stampa

Salve a tutti!
Sono nuovo di questo NG.
Ho un problemino con la stampa da VB5,  ma presumo che con VB6 sarebbe la
stessa cosa:
Ho necessita' di stampare (ovviamente su stampante), un particolare tipo di
font (non normalmente incluso fra quelli di Windows o Word.
Il set di caratteri e' OCR-A.
Ovviamente, non trovandoli neanche fra quelli selezionabili in VB5 ( che
presumo utilizzi gli stessi font di Windows), provvedo ad aggiungerli nel
direttorio dei font di Windows (C:\Windows\Fonts).
Dopo questa operazione, come per miracolo e con soddisfazione, mi ritrovo su
Word la possibilita' di selezionare, utilizzare ed anche stampare su
stampante Epson Stylus color 440, questo nuovo set di caratteri!
Ho pensato, che se la cosa funzionava con Word, avrebbe funzionato anche con
VB5!
Ma purtroppo, ha funzionato soltanto a meta', perche' mentre ho la
possibilita' di selezionare in VB5 questo nuovo set di caratteri e di
vedermeli stampare su video esattamente come mi aspetto nelle varie TextBox,
sulla stampa escono caratteri normali, ma appartenenti ad un altro font e
diverso  quello che esce a video nelle TextBox (OCR-A).
Qualcuno riesce a spiegarmi questa cosa?
E sopratutto, mi sa dare qualche idea su come ottenere in stampa gli stessi
caratteri che si vedono a video?
Mi ripeto: con Word la stampa dei caratteri OCR_A funziona!
Grazie in anticipo,
Marco

 Qualcuno riesce a spiegarmi questa cosa?
Sicuro di aver dato al font il nome giusto?
Prova cercando tra questi
    Dim i As Long
    Do
        Debug.Print Screen.Fonts(i)
        i = i + 1
    Loop While Screen.Fonts(i) <> ""
Ciao 

 ha scritto nel messaggio
news:43325...@x-privat.org...


 Grazio di nuovo
Tu non ci crederai, ma non ho voluto suggerirtelo: lo davo per scontato, 
e  in piu' temevo di essere sfanculizzato da te!
Mi dispiace: con un po' di faccia tosta in piu' da parte mia avresti 
risolto il problema...
Ad ogni modo, io ho sempre fatto, al posto di:
Printer.Font = "OCR A Extended"
cosi':
Printer.FontName = "OCR A Extended"
Tuttavia, se ti funziona, probabilemente Name è il membro di default di 
font...
-- 
Emanuele Torrenti
http://torrenti.altervista.org

 ha scritto nel messaggio
news:dgtvok$23f$1...@area.cu.mi.it...


 O si potra' intervenire sulla spaziatura?
Io l'ho fatto sempre a mano(se ti riferisci all'interlinea). Ti basta 
riferirti a Printer.textHeight("MMM") (che è l'altezza di una riga) e 
avanzare di "interlinea" volte verticalmente, ovvero
Printer.currentY=printer.currentY + interlinea * Printer.textHeight("MMM")
ovviamente, dopo ogni printer.print (con annesso "a capo")
Se ho capito male dimmelo...



Il metodo corretto sarebbe
Printer.Font.Name
 = "OCR A Extended"
Printer.Font = "OCR A Extended"
funziona perchè Name sarà la proprietà di default.
Mentre i metodi Font* esistono ancora per compatibilità con VB3, adesso vi
sono i rispettivi Font.*
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 Ciao
Ciao


 ha scritto nel messaggio
news:dgu5fa$c0v$1...@area.cu.mi.it...


 stampante li supporta).....
Mai fatto nulla del genere... Sembrano problemi che risalgono ai tempi 
delle stampanti ad aghi...


 ha scritto nel messaggio
news:dgu6b2$c0v$3...@area.cu.mi.it...


 O si potra' intervenire sulla spaziatura?
Per intervenire sui TextMetrics dovrai ricorrere all'API della GDI, ma non 
so se ne vale la pena, eventualmente stampare un carattere alla volta 
riposizionandoti a mano ogni volta potrebbe essere una soluzione più 
sbrigativa (una funzioncina e via).
Però mi pare strano che un font OCR debba essere rimaneggiato per poter 
essere utilizzato.
Ciao 

 lettura ottica.
Temo che ti toccherà di stampare carattere per carattere, impostando di
volta in volta la CurrentX e CurrentY dell'oggetto printer.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:4332a...@x-privat.org...


 essere utilizzato.
Se deve andare a finire in uno di quei moduli prestampati a quadretti,
può essere... credo :-)
Bye, G.