general/starter_basic

<?php

/* $Id: starter_basic.php,v 1.5 2006/10/02 19:22:45 rjs Exp $

 *

 * Basic starter:

 * Create some simple text, vector graphics and image output

 *

 * required software: PDFlib Lite/PDFlib/PDFlib+PDI/PPS 7

 * required data: none

 */

/* This is where the data files are. Adjust as necessary. */

$searchpath = "../data/";

$imagefile = "nesrin.jpg";

$outfilename = "starter_basic.pdf";

$p = PDF_new();

# This means we must check return values of load_font() etc.

PDF_set_parameter($p, "errorpolicy", "return");

PDF_set_parameter($p, "SearchPath", $searchpath);

/* we use "utf8" as textformat, this allows to use unicode encoding */

PDF_set_parameter($p, "textformat", "utf8");

if (PDF_begin_document($p, $outfilename, "") == 0) {

    die("Error: " . PDF_get_errmsg($p));

}

PDF_set_info($p, "Creator", "PDFlib starter sample");

PDF_set_info($p, "Title", "starter_basic");

/* We load the $image before the first page, and use it

 * on all pages

 */

$image = PDF_load_image($p, "auto", $imagefile, "");

if ($image == 0) {

    die("Error: " . PDF_get_errmsg($p));

}

/* Page 1 */

PDF_begin_page_ext($p, 595, 842, "");

/* For PDFlib Lite: change "unicode" to "winansi" */

$font = PDF_load_font($p, "Helvetica-Bold", "unicode", "");

if ($font == 0) {

    die("Error: " . PDF_get_errmsg($p));

}

PDF_setfont($p, $font, 24);

PDF_set_text_pos($p, 50, 700);

PDF_show($p, "Hello world!");

PDF_fit_image($p, $image, 0.0, 0.0, "scale=0.25");

PDF_end_page_ext($p, "");

/* Page 2 */

PDF_begin_page_ext($p, 595, 842, "");

/* red rectangle */

PDF_setcolor($p, "fill", "rgb", 1.0, 0.0, 0.0, 0.0);

PDF_rect($p, 200, 200, 250, 150);

PDF_fill($p);

/* blue circle */

PDF_setcolor($p, "fill", "rgb", 0.0, 0.0, 1.0, 0.0);

PDF_arc($p, 400, 600, 100, 0, 360);

PDF_fill($p);

/* thick gray line */

PDF_setcolor($p, "stroke", "gray", 0.5, 0.0, 0.0, 0.0);

PDF_setlinewidth($p, 10);

PDF_moveto($p, 100, 500);

PDF_lineto($p, 300, 700);

PDF_stroke($p);

/* Using the same $image handle means the data will be copied

 * to the PDF only once, which saves space.

 */

PDF_fit_image($p, $image, 150.0, 25.0, "scale=0.25");

PDF_end_page_ext($p, "");

/* Page 3 */

PDF_begin_page_ext($p, 595, 842, "");

/* Fit the image to a box of predefined size (without distortion) */

$optlist = "boxsize={400 400} position={center} fitmethod=meet";

PDF_fit_image($p, $image, 100, 200, $optlist);

PDF_end_page_ext($p, "");

PDF_close_image($p, $image);

PDF_end_document($p, "");

PDF_delete($p);

print "$outfilename generated";

?>