annotate lib/plugins/rfpdf/test_unicode.rfpdf @ 1621:3a510bf6a9bc

Merge from live branch
author Chris Cannam
date Fri, 13 Jul 2018 10:44:33 +0100
parents 433d4f72a19b
children
rev   line source
Chris@441 1 <%
Chris@441 2 doc_title = "test title";
Chris@441 3 doc_subject = "test description";
Chris@441 4 doc_keywords = "test keywords";
Chris@441 5 htmlcontent = "&lt; € &euro; &#8364; &amp; è &egrave; &copy; &gt;<br /><h1>heading 1</h1><h2>heading 2</h2><h3>heading 3</h3><h4>heading 4</h4><h5>heading 5</h5><h6>heading 6</h6>ordered list:<br /><ol><li><b>bold text</b></li><li><i>italic text</i></li><li><u>underlined text</u></li><li><a href=\"http:#www.tecnick.com\">link to http://www.tecnick.com</a></li><li>test break<br />second line<br />third line</li><li><font size=\"+3\">font + 3</font></li><li><small>small text</small></li><li>normal <sub>subscript</sub> <sup>superscript</sup></li></ul><hr />table:<br /><table border=\"1\" cellspacing=\"1\" cellpadding=\"1\"><tr><th>#</th><th>A</th><th>B</th></tr><tr><th>1</th><td bgcolor=\"#cccccc\">A1</td><td>B1</td></tr><tr><th>2</th><td>A2 € &euro; &#8364; &amp; è &egrave; </td><td>B2</td></tr><tr><th>3</th><td>A3</td><td><font color=\"#FF0000\">B3</font></td></tr></table><hr />image:<br /><img src=\"#{File.join(RAILS_ROOT, 'public')}/logo_example.png\" alt=\"test alt attribute\" width=\"100\" height=\"100\" border=\"0\" />";
Chris@441 6
Chris@441 7
Chris@441 8 # ENGLISH
Chris@441 9
Chris@441 10 @l = {}
Chris@441 11
Chris@441 12 # PAGE META DESCRIPTORS --------------------------------------
Chris@441 13
Chris@441 14 @l['a_meta_charset'] = "UTF-8";
Chris@441 15 @l['a_meta_dir'] = "ltr";
Chris@441 16 @l['a_meta_language'] = "en";
Chris@441 17
Chris@441 18 # TRANSLATIONS --------------------------------------
Chris@441 19 @l['w_page'] = "page";
Chris@441 20
Chris@441 21
Chris@441 22 # create new PDF document (document units are set by default to millimeters)
Chris@441 23 pdf = TCPDF.new
Chris@441 24
Chris@441 25 # set document information
Chris@441 26 pdf.SetCreator("TCPDF");
Chris@441 27 pdf.SetAuthor("TCPDF");
Chris@441 28 pdf.SetTitle(doc_title);
Chris@441 29 pdf.SetSubject(doc_subject);
Chris@441 30 pdf.SetKeywords(doc_keywords);
Chris@441 31
Chris@441 32 pdf.SetHeaderData("#{File.join(RAILS_ROOT, 'public')}/logo_example.png", 20, "header title", "first row\nsecond row\nthird row");
Chris@441 33
Chris@441 34 #set margins
Chris@441 35 pdf.SetMargins(15, 27, 15);
Chris@441 36 #set auto page breaks
Chris@441 37 pdf.SetAutoPageBreak(true, 25);
Chris@441 38 pdf.SetPrintHeader
Chris@441 39 pdf.SetPrintFooter
Chris@441 40 pdf.SetHeaderMargin(5);
Chris@441 41 pdf.SetFooterMargin(10);
Chris@441 42 pdf.SetImageScale(4); #set image scale factor
Chris@441 43
Chris@441 44 pdf.SetHeaderFont(["FreeSans", '', 10]);
Chris@441 45 pdf.SetFooterFont(["FreeSans", '', 8]);
Chris@441 46
Chris@441 47 pdf.SetLanguageArray(@l); #set language items
Chris@441 48
Chris@441 49
Chris@441 50 #initialize document
Chris@441 51 pdf.alias_nb_pages();
Chris@441 52
Chris@441 53 pdf.AddPage();
Chris@441 54
Chris@441 55 # set barcode
Chris@441 56 # pdf.SetBarcode(Time.now.strftime("Y-m-d H:i:s"));
Chris@441 57
Chris@441 58 # output some HTML code
Chris@441 59 pdf.SetFont("vera", "", 10);
Chris@441 60
Chris@441 61 pdf.writeHTML(htmlcontent, true, 0);
Chris@441 62
Chris@441 63 # output two html columns
Chris@441 64 first_column_width = 80;
Chris@441 65 current_y_position = pdf.GetY();
Chris@441 66 pdf.writeHTMLCell(first_column_width, 0, 0, current_y_position, "<b>hello</b>", 0, 0, 0);
Chris@441 67 pdf.writeHTMLCell(0, 0, first_column_width, current_y_position, "<i>world</i>", 0, 1, 0);
Chris@441 68
Chris@441 69 # output some content
Chris@441 70 pdf.SetFont("vera", "BI", 20);
Chris@441 71 pdf.Cell(0,10,"TEST Bold-Italic Cell",1,1,'C');
Chris@441 72
Chris@441 73 # output some UTF-8 test content
Chris@441 74 pdf.AddPage();
Chris@441 75 pdf.SetFont("FreeSans", "", 12);
Chris@441 76 utf8text = open(File.join(RAILS_ROOT, 'vendor/plugins/rfpdf',"utf8test.txt"), "rb").read; # get utf-8 text form file
Chris@441 77 pdf.SetFillColor(230, 240, 255, true);
Chris@441 78 pdf.Write(5, utf8text, '', 1);
Chris@441 79
Chris@441 80 # remove page header/footer
Chris@441 81 pdf.SetPrintHeader(false);
Chris@441 82 pdf.SetPrintFooter(false);
Chris@441 83
Chris@441 84 # Two HTML columns test
Chris@441 85 pdf.AddPage();
Chris@441 86 right_column = "<b>right column</b> right column right column right column right column
Chris@441 87 right column right column right column right column right column right column
Chris@441 88 right column right column right column right column right column right column";
Chris@441 89 left_column = "<b>left column</b> left column left column left column left column left
Chris@441 90 column left column left column left column left column left column left column
Chris@441 91 left column left column left column left column left column left column left
Chris@441 92 column";
Chris@441 93 first_column_width = 80;
Chris@441 94 second_column_width = 80;
Chris@441 95 column_space = 20;
Chris@441 96 current_y_position = pdf.GetY();
Chris@441 97 pdf.writeHTMLCell(first_column_width, 0, 0, 0, left_column, 1, 0, 0);
Chris@441 98 pdf.Cell(0);
Chris@441 99 pdf.writeHTMLCell(second_column_width, 0, first_column_width+column_space, current_y_position, right_column, 0, 0, 0);
Chris@441 100
Chris@441 101 # add page header/footer
Chris@441 102 pdf.SetPrintHeader(true);
Chris@441 103 pdf.SetPrintFooter(true);
Chris@441 104
Chris@441 105 pdf.AddPage();
Chris@441 106
Chris@441 107 # Multicell test
Chris@441 108 pdf.MultiCell(40, 5, "A test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0, 0);
Chris@441 109 pdf.MultiCell(40, 5, "B test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0);
Chris@441 110 pdf.MultiCell(40, 5, "C test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0, 0);
Chris@441 111 pdf.MultiCell(40, 5, "D test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0, 2);
Chris@441 112 pdf.MultiCell(40, 5, "F test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0);
Chris@441 113
Chris@441 114 #Close and output PDF document
Chris@441 115 %><%=pdf.Output()%>