obsolete.ChilliProject/vendor/plugins/rfpdf/test_unicode.rfpdf

115 lines
4.7 KiB
Plaintext

<%
doc_title = "test title";
doc_subject = "test description";
doc_keywords = "test keywords";
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\" />";
# ENGLISH
@l = {}
# PAGE META DESCRIPTORS --------------------------------------
@l['a_meta_charset'] = "UTF-8";
@l['a_meta_dir'] = "ltr";
@l['a_meta_language'] = "en";
# TRANSLATIONS --------------------------------------
@l['w_page'] = "page";
# create new PDF document (document units are set by default to millimeters)
pdf = TCPDF.new
# set document information
pdf.SetCreator("TCPDF");
pdf.SetAuthor("TCPDF");
pdf.SetTitle(doc_title);
pdf.SetSubject(doc_subject);
pdf.SetKeywords(doc_keywords);
pdf.SetHeaderData("#{File.join(RAILS_ROOT, 'public')}/logo_example.png", 20, "header title", "first row\nsecond row\nthird row");
#set margins
pdf.SetMargins(15, 27, 15);
#set auto page breaks
pdf.SetAutoPageBreak(true, 25);
pdf.SetPrintHeader
pdf.SetPrintFooter
pdf.SetHeaderMargin(5);
pdf.SetFooterMargin(10);
pdf.SetImageScale(4); #set image scale factor
pdf.SetHeaderFont(["FreeSans", '', 10]);
pdf.SetFooterFont(["FreeSans", '', 8]);
pdf.SetLanguageArray(@l); #set language items
#initialize document
pdf.alias_nb_pages();
pdf.AddPage();
# set barcode
# pdf.SetBarcode(Time.now.strftime("Y-m-d H:i:s"));
# output some HTML code
pdf.SetFont("vera", "", 10);
pdf.writeHTML(htmlcontent, true, 0);
# output two html columns
first_column_width = 80;
current_y_position = pdf.GetY();
pdf.writeHTMLCell(first_column_width, 0, 0, current_y_position, "<b>hello</b>", 0, 0, 0);
pdf.writeHTMLCell(0, 0, first_column_width, current_y_position, "<i>world</i>", 0, 1, 0);
# output some content
pdf.SetFont("vera", "BI", 20);
pdf.Cell(0,10,"TEST Bold-Italic Cell",1,1,'C');
# output some UTF-8 test content
pdf.AddPage();
pdf.SetFont("FreeSans", "", 12);
utf8text = open(File.join(RAILS_ROOT, 'vendor/plugins/rfpdf',"utf8test.txt"), "rb").read; # get utf-8 text form file
pdf.SetFillColor(230, 240, 255, true);
pdf.Write(5, utf8text, '', 1);
# remove page header/footer
pdf.SetPrintHeader(false);
pdf.SetPrintFooter(false);
# Two HTML columns test
pdf.AddPage();
right_column = "<b>right column</b> right column right column right column right column
right column right column right column right column right column right column
right column right column right column right column right column right column";
left_column = "<b>left column</b> left column left column left column left column left
column left column left column left column left column left column left column
left column left column left column left column left column left column left
column";
first_column_width = 80;
second_column_width = 80;
column_space = 20;
current_y_position = pdf.GetY();
pdf.writeHTMLCell(first_column_width, 0, 0, 0, left_column, 1, 0, 0);
pdf.Cell(0);
pdf.writeHTMLCell(second_column_width, 0, first_column_width+column_space, current_y_position, right_column, 0, 0, 0);
# add page header/footer
pdf.SetPrintHeader(true);
pdf.SetPrintFooter(true);
pdf.AddPage();
# Multicell test
pdf.MultiCell(40, 5, "A test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0, 0);
pdf.MultiCell(40, 5, "B test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0);
pdf.MultiCell(40, 5, "C test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0, 0);
pdf.MultiCell(40, 5, "D test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0, 2);
pdf.MultiCell(40, 5, "F test multicell line 1\ntest multicell line 2\ntest multicell line 3", 1, 'J', 0);
#Close and output PDF document
%><%=pdf.Output()%>