Per stampare con Class

Scritto da Ignacio Ortiz, l'autore del FiveWin Report Class, questo frammento di codice è completamente freeware e non è in alcun modo parte di FiveWin. Questo codice può essere per molti la soluzione cercata da tempo; esso vi permetterà di scrivere direttamente sulla stampante, dall'interno di una qualunque applicazione che sia stata sviluppata con FiveWin, proprio come al tempo del buon vecchio DOS! Tutti quelli che necessitano della velocità di stampa che era (é) propria del DOS, possono utilizzare questa nuova classe invece della TPrinter. L'utilizzo di questa classe è semplice e molto simile alla TPrinter class di FiveWin, ma non sono stati resi disponibili comandi di alcun tipo per permettere l'utilizzo di una qualunque variabile statica. Eccovi un piccolo esempio per capire come questa nuova classe va utilizzata:

  LOCAL oPrn

  oPrn := TDosPrn():New("lpt1")

  oPrn:StartPage()					// opzionale
  oPrn:Say(10,20, "Questo mi porta alla linea 10, colonna 20")
  oPrn:EndPage()					// opzionale

  oPrn:End()

Per avere maggiori informazioni su come la classe è strutturata e sui metodi che la compongono date una occhiata al file .PRG che accompagna questo testo. Alla fine della classe, nello stesso file .PRG, troverete una piccola funzione chiamata WorkSheet che renderà il lavoro della stampa in DOS un pochino più facile.