Programmazione > Progetti degli utenti
Report con PdfWriter
doublemm:
--- Citazione da: Golia - 26 Dicembre 2010, 23:18:18 ---Ciao,
Apri la classe Pdfwriter e alle righe.. circa 260, trovi questo
--- Codice: gambas ---
CASE "a3"
$fwPt = 841.89
$fhPt = 1190.55
CASE "a4"
$fwPt = 595.28
$fhPt = 841.89
CASE "a5"
$fwPt = 420.94
$fhPt = 595.28
CASE "letter"
$fwPt = 612
$fhPt = 792
CASE "legal"
$fwPt = 612
$fhPt = 1008
--- Termina codice ---
Ci aggiungi un case con la misura da te desiderata, poi
--- Codice: gambas ---
New ClassStampaOrdine("Portrait", "mm", "NUOVOCASE")
--- Termina codice ---
--- Termina citazione ---
nella mia classe pdfwriter il codice l'ho trovato così
--- Codice: gambas ---
Case "in"
$k = 72
Default
Error.Raise("Incorrect unit: " & unit)
End Select
'Page format
' SELECT CASE Lower(form)
' CASE "a3"
' $fwPt = 841.89
' $fhPt = 1190.55
' CASE "a4"
' $fwPt = 595.28
' $fhPt = 841.89
' CASE "a5"
' $fwPt = 420.94
' $fhPt = 595.28
' CASE "letter"
' $fwPt = 612
' $fhPt = 792
' CASE "legal"
' $fwPt = 612
' $fhPt = 1008
' DEFAULT
' Error.Raise("Unknown page format: " & form)
' END SELECT
' $fw = $fwPt / $k
' $fh = $fhPt / $k
$pageFormats = New Collection
$pageFormats.Add([841.89, 1190.55], "a3")
$pageFormats.Add([595.28, 841.89], "a4")
$pageFormats.Add([420.94, 595.28], "a5")
$pageFormats.Add([612, 792], "letter")
$pageFormats.Add([612, 1008], "legal")
$pageFormats.Add([207.12, 368.85], "citizen")
size = _getpageformat(form)
If (IsNull(size)) Then
Error.Raise("Unknown page format: " & form)
End If
--- Termina codice ---
naturalmente il formato citizen l'ho aggiunto io
TheSim1965:
Magari si era capito ma le misure sono espresse in punti tipografici (1/72") quindi per avere le misure in cm la formuletta è: <valore> / 72 * 2.54
Ciao e Buon Lavoro!
Golia:
Ciao a tutti
In questi giorni ho avuto modo di riguardarmi questo progetto, e con il consiglio dell'amico Picavbg ho aggiunto un'altro esempio con "Multicell".
Ho rifatto tutto tranne i vecchi esempi e naturalmente Pdfwriter, che però ho un pò ritoccato (spero che Md9327 non me ne voglia :) e spero anche che mi legga).
L'unica modifica sostanziale, che se qualcuno importa la classe Pdfwriter nel proprio progetto con report fatti precedentemente, è la funzione "Multiriga" che avevo fatto io all'epoca e che a MD non piaceva il nome :). L'ho rinominata "Multicol" visto che effettivamente va a creare colonne....
Comunque basta SOLO rinominare >Multiriga< con >MultiCol<
Ho rimodernato l'anteprima di stampa "PrintPdf".
Comunque il report d'esempio da guardare è sempre quello di MD, 24 pagine di esempi con testi disegni colori e barcode.
Spero vi possa essere utile :2birre:
Golia:
Versione di oggi
Sostituito il componete gb.pdf con gb.poppler.
Quindi il form per l'anteprima del file (Printpdf) è stato cambiato, il resto funziona come prima
Navigazione
[0] Indice dei post
Vai alla versione completa