hpdf 2.0.8

data/tests/font_demo.rb

@@ -0,0 +1,67 @@
+#
+# << Haru Free PDF Library 2.0.0 >> -- font_example.rb
+#
+# Copyright (c) 1999-2006 Takeshi Kanno <takeshi_kanno@est.hi-ho.ne.jp>
+#
+# Permission to use, copy, modify, distribute and sell this software
+# and its documentation for any purpose is hereby granted without fee,
+# provided that the above copyright notice appear in all copies and
+# that both that copyright notice and this permission notice appear
+# in supporting documentation.
+# It is provided "as is" without express or implied warranty.
+#
+
+require "hpdf"
+
+font_list = ["Courier", "Courier-Bold", "Courier-Oblique", "Courier-BoldOblique", "Helvetica", "Helvetica-Bold", "Helvetica-Oblique", "Helvetica-BoldOblique", "Times-Roman", "Times-Bold", "Times-Italic", "Times-BoldItalic", "Symbol", "ZapfDingbats", nil]
+
+pdf = HPDFDoc.new
+
+page = pdf.add_page
+height = page.get_height
+width = page.get_width
+
+page.set_line_width(1.0)
+page.rectangle(50.0, 50.0, width - 100.0, height - 110.0)
+page.stroke
+
+font1 = pdf.get_font("Helvetica", nil)
+
+title = "Font Example"
+page.set_font_and_size(font1, 24.0)
+tw = page.text_width(title)
+page.begin_text
+page.text_out((width - tw) / 2, height - 50.0, title)
+page.set_font_and_size(font1, 16.0)
+page.text_out(60.0, height - 80.0, "<Standerd Type1 fonts samples>")
+page.end_text
+
+samp_text = "abcdefgABCDEFG12345!#$\%&+-@?"
+
+page.begin_text
+page.move_text_pos(60.0, height - 105.0)
+
+i = 0
+while font_list[i]
+  font2 = pdf.get_font(font_list[i], nil)
+
+  page.set_font_and_size(font1, 9.0)
+  page.show_text(font_list[i])
+  page.move_text_pos(0.0, -18.0)
+
+  page.set_font_and_size(font2, 20.0)
+  page.show_text(samp_text)
+  page.move_text_pos(0.0, -20.0)
+
+  i = i + 1
+end
+
+page.end_text
+
+if $demo_output_filename
+  file_name= $demo_output_filename
+else
+  file_name= $0 + ".pdf"
+end  
+
+pdf.save_to_file(file_name)

data/tests/line_demo.rb

@@ -0,0 +1,301 @@
+#
+# << Haru Free PDF Library 2.0.2 >> -- line_demo.rb
+#
+# http://libharu.sourceforge.net/
+#
+# Copyright (c) 1999-2006 Takeshi Kanno
+#
+# Permission to use, copy, modify, distribute and sell this software
+# and its documentation for any purpose is hereby granted without fee,
+# provided that the above copyright notice appear in all copies and
+# that both that copyright notice and this permission notice appear
+# in supporting documentation.
+# It is provided "as is" without express or implied warranty.
+#
+
+require "hpdf"
+
+def draw_line(page, x, y, text)
+  page.begin_text
+  page.move_text_pos(x, y - 10)
+  page.show_text(text)
+  page.end_text
+
+  page.move_to(x, y - 15)
+  page.line_to(x + 220, y - 15)
+  page.stroke
+end
+
+def draw_line2(page, x, y, text)
+  page.begin_text
+  page.move_text_pos(x, y)
+  page.show_text(text)
+  page.end_text
+
+  page.move_to(x + 30, y - 25)
+  page.line_to(x + 160, y - 25)
+  page.stroke
+end
+
+def draw_rect(page, x, y, text)
+  page.begin_text
+  page.move_text_pos(x, y - 10)
+  page.show_text(text)
+  page.end_text
+
+  page.rectangle(x, y - 40, 220, 25)
+end
+
+pdf = HPDFDoc.new
+
+pdf.set_compression_mode(HPDFDoc::HPDF_COMP_ALL)
+
+font = pdf.get_font("Helvetica", nil)
+
+page = pdf.add_page
+
+#print the lines of the page.#
+page.set_line_width(1)
+x = page.get_width - 100
+y = page.get_height - 110
+page.rectangle(50, 50, x, y)
+page.stroke
+
+#print the title of the page (with positioning center).#
+page.set_font_and_size(font, 24)
+tw = page.text_width('Line Demo')
+page.begin_text
+
+x =(page.get_width - tw) / 2
+y = page.get_height - 50
+page.move_text_pos(x, y)
+
+page.show_text('Line Demo')
+page.end_text
+
+page.set_font_and_size(font, 10)
+
+#Draw verious widths of lines.#
+page.set_line_width(0)
+draw_line(page, 60, 770, 'line width = 0')
+
+page.set_line_width(1.0)
+draw_line(page, 60, 740, 'line width = 1.0')
+
+page.set_line_width(2.0)
+draw_line(page, 60, 710, 'line width = 2.0')
+
+#Line dash pattern#
+page.set_line_width(1.0)
+
+page.set_dash([3], 1)
+draw_line(page, 60, 680, 'dash_ptn=[3], phase=1 -- 2 on, 3 off, 3 on...')
+
+page.set_dash([7, 3], 2)
+draw_line(page, 60, 650, 'dash_ptn=[7, 3], phase=2 -- 5 on 3 off, 7 on,...')
+
+page.set_dash([8, 7, 2, 7], 0)
+draw_line(page, 60, 620, 'dash_ptn=[8, 7, 2, 7], phase=0')
+
+page.set_dash([], 0)
+
+page.set_line_width(30)
+page.set_rgb_stroke(0.0, 0.5, 0.0)
+
+#Line Cap Style#
+page.set_line_cap(HPDFDoc::HPDF_BUTT_END)
+draw_line2(page, 60, 570, 'HPDF_BUTT_END')
+
+page.set_line_cap(HPDFDoc::HPDF_ROUND_END)
+draw_line2(page, 60, 505, 'HPDF_ROUND_END')
+
+page.set_line_cap(HPDFDoc::HPDF_PROJECTING_SCUARE_END)
+draw_line2(page, 60, 440, 'HPDF_PROJECTING_SCUARE_END')
+
+#Line Join Style#
+page.set_line_width(30)
+page.set_rgb_stroke(0.0, 0.0, 0.5)
+
+page.set_line_join(HPDFDoc::HPDF_MITER_JOIN)
+page.move_to(120, 300)
+page.line_to(160, 340)
+page.line_to(200, 300)
+page.stroke
+
+page.begin_text
+page.move_text_pos(60, 360)
+page.show_text('HPDF_MITER_JOIN')
+page.end_text
+
+page.set_line_join(HPDFDoc::HPDF_ROUND_JOIN)
+page.move_to(120, 195)
+page.line_to(160, 235)
+page.line_to(200, 195)
+page.stroke
+
+page.begin_text
+page.move_text_pos(60, 255)
+page.show_text('HPDF_ROUND_JOIN')
+page.end_text
+
+page.set_line_join(HPDFDoc::HPDF_BEVEL_JOIN)
+page.move_to(120, 90)
+page.line_to(160, 130)
+page.line_to(200, 90)
+page.stroke
+
+page.begin_text
+page.move_text_pos(60, 150)
+page.show_text('HPDF_BEVEL_JOIN')
+page.end_text
+
+# Draw rectangle #
+page.set_line_width(2)
+page.set_rgb_stroke(0, 0, 0)
+page.set_rgb_fill(0.75, 0.0, 0.0)
+
+draw_rect(page, 300, 770, 'stroke')
+page.stroke
+
+draw_rect(page, 300, 720, 'Fill')
+page.fill
+
+draw_rect(page, 300, 670, 'Fill then stroke')
+page.fill_stroke
+
+#clip Rect#
+page.gsave  # Save the current graphic state#
+draw_rect(page, 300, 620, 'Clip rectangle')
+page.clip
+page.stroke
+page.set_font_and_size(font, 13)
+
+page.begin_text
+page.move_text_pos(290, 600)
+page.set_text_leading(12)
+page.show_text('Clip Clip Clip Clip Clip Clipi Clip Clip Clip')
+page.show_text_next_line('Clip Clip Clip Clip Clip Clip Clip Clip Clip')
+page.show_text_next_line('Clip Clip Clip Clip Clip Clip Clip Clip Clip')
+page.end_text
+page.grestore
+
+x0 = 330
+y0 = 440
+x1 = 430
+y1 = 530
+x2 = 480
+y2 = 470
+x3 = 480
+y3 = 90
+
+#Curve Example(curve_to2)#
+page.set_rgb_fill(0, 0, 0)
+
+page.begin_text
+page.move_text_pos(300, 540)
+page.show_text('curve_to2(x1, y1, x2. y2)')
+page.end_text
+
+page.begin_text
+page.move_text_pos(x0 + 5, y0 - 5)
+page.show_text('Current point')
+page.move_text_pos(x1 - x0, y1 - y0)
+page.show_text('(x1, y1)')
+page.move_text_pos(x2 - x1, y2 - y1)
+page.show_text('(x2, y2)')
+page.end_text
+
+page.set_dash([], 0)
+
+page.set_line_width(0.5)
+page.move_to(x1, y1)
+page.line_to(x2, y2)
+page.stroke
+
+page.set_dash([], 0)
+
+page.set_line_width(1.5)
+
+page.move_to(x0, y0)
+page.curve_to2(x1, y1, x2, y2)
+page.stroke
+
+#Curve Example(curve_to3)#
+y0 = y0 - 150
+y1 = y1 - 150
+y2 = y2 - 150
+
+page.begin_text
+page.move_text_pos(300, 390)
+page.show_text('curve_to3(x1, y1, x2. y2)')
+page.end_text
+
+page.begin_text
+page.move_text_pos(x0 + 5, y0 - 5)
+page.show_text('Current point')
+page.move_text_pos(x1 - x0, y1 - y0)
+page.show_text('(x1, y1)')
+page.move_text_pos(x2 - x1, y2 - y1)
+page.show_text('(x2, y2)')
+page.end_text
+
+page.set_dash([3], 1)
+
+page.set_line_width(0.5)
+page.move_to(x0, y0)
+page.line_to(x1, y1)
+page.stroke
+
+page.set_dash([], 0)
+
+page.set_line_width(1.5)
+page.move_to(x0, y0)
+page.curve_to3(x1, y1, x2, y2)
+page.stroke
+
+# Curve Example(curve_to)
+y0 = y0 - 150
+y1 = y1 - 160
+y2 = y2 - 130
+x2 = x2 + 10
+
+page.begin_text
+page.move_text_pos(300, 240)
+page.show_text('curve_to(x1, y1, x2. y2, x3, y3)')
+page.end_text
+
+page.begin_text
+page.move_text_pos(x0 + 5, y0 - 5)
+page.show_text('Current point')
+page.move_text_pos(x1 - x0, y1 - y0)
+page.show_text('(x1, y1)')
+page.move_text_pos(x2 - x1, y2 - y1)
+page.show_text('(x2, y2)')
+page.move_text_pos(x3 - x2, y3 - y2)
+page.show_text('(x3, y3)')
+page.end_text
+
+page.set_dash([3], 1)
+
+page.set_line_width(0.5)
+page.move_to(x0, y0)
+page.line_to(x1, y1)
+page.stroke
+page.move_to(x2, y2)
+page.line_to(x3, y3)
+page.stroke
+
+page.set_dash([], 0)
+
+page.set_line_width(1.5)
+page.move_to(x0, y0)
+page.curve_to(x1, y1, x2, y2, x3, y3)
+page.stroke
+
+if $demo_output_filename
+  file_name= $demo_output_filename
+else
+  file_name= $0 + ".pdf"
+end  
+
+pdf.save_to_file(file_name)

data/tests/slide_show_demo.rb

@@ -0,0 +1,139 @@
+#
+# << Haru Free PDF Library 2.0.6 >> -- slideshow_demo.rb
+#
+# http://libharu.sourceforge.net/
+#
+# Copyright (c) 1999-2006 Takeshi Kanno
+#
+# Permission to use, copy, modify, distribute and sell this software
+# and its documentation for any purpose is hereby granted without fee,
+# provided that the above copyright notice appear in all copies and
+# that both that copyright notice and this permission notice appear
+# in supporting documentation.
+# It is provided "as is" without express or implied warranty.
+#
+
+require "hpdf"
+
+RAND_MAX = 255
+
+def print_page(page, caption, font, style, prev, next_p)
+
+  r = rand
+  g = rand
+  b = rand
+
+  page.set_width(800)
+  page.set_height(600)
+
+  page.set_rgb_fill(r, g, b)
+  page.rectangle(0, 0, 800, 600)
+  page.fill()
+
+  page.set_rgb_fill(1 - r, 1 - b, 1 - b)
+  page.set_font_and_size(font, 30)
+
+  page.begin_text()
+  page.set_text_matrix(0.8, 0.0, 0.0, 1.0, 0.0, 0.0);   
+  page.text_out(50, 530, caption)
+
+  page.set_text_matrix(1.0, 0.0, 0.0, 1.0, 0.0, 0.0);   
+  page.set_font_and_size(font, 20)
+  page.text_out(55, 300, "Type \"Ctrl+L\" in order to return from full screen mode.")
+  page.end_text()
+
+  page.set_slide_show(style, 5, 1)
+  page.set_font_and_size(font, 20)
+
+  if (next_p != nil) 
+    page.begin_text()
+    page.text_out(680, 50, "Next=>")
+    page.end_text()
+
+    dst = next_p.create_destination()
+    dst.set_fit()
+    annot = page.create_link_annot(680, 50, 680, 70, dst)
+    annot.set_border_style(0, 0, 0)
+    annot.set_highlight_mode(HPDFDoc::HPDF_ANNOT_INVERT_BOX)
+  end
+
+  if (prev != nil) 
+    page.begin_text()
+    page.text_out(50, 50, "<=Prev")
+    page.end_text()
+
+    dst = prev.create_destination()
+    dst.set_fit()
+    annot = page.create_link_annot(50, 50, 110, 70, dst)
+    annot.set_border_style(0, 0, 0)
+    annot.set_highlight_mode(HPDFDoc::HPDF_ANNOT_INVERT_BOX)
+  end
+
+end
+
+
+pdf = HPDFDoc.new
+
+font = pdf.get_font("Courier", nil)
+page_0 = pdf.add_page()
+page_1 = pdf.add_page()
+page_2 = pdf.add_page()
+page_3 = pdf.add_page()
+page_4 = pdf.add_page()
+page_5 = pdf.add_page()
+page_6 = pdf.add_page()
+page_7 = pdf.add_page()
+page_8 = pdf.add_page()
+page_9 = pdf.add_page()
+page_10 = pdf.add_page()
+page_11 = pdf.add_page()
+page_12 = pdf.add_page()
+page_13 = pdf.add_page()
+page_14 = pdf.add_page()
+page_15 = pdf.add_page()
+page_16 = pdf.add_page()
+
+print_page(page_0, "HPDFDoc::HPDF_TS_WIPE_RIGHT", font, 
+    HPDFDoc::HPDF_TS_WIPE_RIGHT, nil, page_1);
+print_page(page_1, "HPDFDoc::HPDF_TS_WIPE_UP", font, 
+    HPDFDoc::HPDF_TS_WIPE_UP, page_0, page_2);
+print_page(page_2, "HPDFDoc::HPDF_TS_WIPE_LEFT", font, 
+    HPDFDoc::HPDF_TS_WIPE_LEFT, page_1, page_3);
+print_page(page_3, "HPDFDoc::HPDF_TS_WIPE_DOWN", font, 
+    HPDFDoc::HPDF_TS_WIPE_DOWN, page_2, page_4);
+print_page(page_4, "HPDFDoc::HPDF_TS_BARN_DOORS_HORIZONTAL_OUT", font, 
+    HPDFDoc::HPDF_TS_BARN_DOORS_HORIZONTAL_OUT, page_3, page_5);
+print_page(page_5, "HPDFDoc::HPDF_TS_BARN_DOORS_HORIZONTAL_IN", font, 
+    HPDFDoc::HPDF_TS_BARN_DOORS_HORIZONTAL_IN, page_4, page_6);
+print_page(page_6, "HPDFDoc::HPDF_TS_BARN_DOORS_VERTICAL_OUT", font, 
+    HPDFDoc::HPDF_TS_BARN_DOORS_VERTICAL_OUT, page_5, page_7);
+print_page(page_7, "HPDFDoc::HPDF_TS_BARN_DOORS_VERTICAL_IN", font, 
+    HPDFDoc::HPDF_TS_BARN_DOORS_VERTICAL_IN, page_6, page_8);
+print_page(page_8, "HPDFDoc::HPDF_TS_BOX_OUT", font, 
+    HPDFDoc::HPDF_TS_BOX_OUT, page_7, page_9);
+print_page(page_9, "HPDFDoc::HPDF_TS_BOX_IN", font, 
+    HPDFDoc::HPDF_TS_BOX_IN, page_8, page_10);
+print_page(page_10, "HPDFDoc::HPDF_TS_BLINDS_HORIZONTAL", font, 
+    HPDFDoc::HPDF_TS_BLINDS_HORIZONTAL, page_9, page_11);
+print_page(page_11, "HPDFDoc::HPDF_TS_BLINDS_VERTICAL", font, 
+    HPDFDoc::HPDF_TS_BLINDS_VERTICAL, page_10, page_12);
+print_page(page_12, "HPDFDoc::HPDF_TS_DISSOLVE", font, 
+    HPDFDoc::HPDF_TS_DISSOLVE, page_11, page_13);
+print_page(page_13, "HPDFDoc::HPDF_TS_GLITTER_RIGHT", font, 
+    HPDFDoc::HPDF_TS_GLITTER_RIGHT, page_12, page_14);
+print_page(page_14, "HPDFDoc::HPDF_TS_GLITTER_DOWN", font, 
+    HPDFDoc::HPDF_TS_GLITTER_DOWN, page_13, page_15);
+print_page(page_15, "HPDFDoc::HPDF_TS_GLITTER_TOP_LEFT_TO_BOTTOM_RIGHT", font, 
+    HPDFDoc::HPDF_TS_GLITTER_TOP_LEFT_TO_BOTTOM_RIGHT, page_14, page_16);
+print_page(page_16, "HPDFDoc::HPDF_TS_REPLACE", font, 
+    HPDFDoc::HPDF_TS_REPLACE, page_15, nil);
+
+pdf.set_page_mode(HPDFDoc::HPDF_PAGE_MODE_FULL_SCREEN)
+
+if $demo_output_filename
+  file_name= $demo_output_filename
+else
+  file_name= $0 + ".pdf"
+end  
+
+pdf.save_to_file(file_name)