Viewing file: starter_layer.php (3.83 KB) -rw-r--r-- Select action/file-type: (+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
<?php # $Id: starter_layer.php,v 1.1.2.2 2008/02/11 20:10:28 rjs Exp $ # Starter layer: # Define several layers, output images and text to them and define # particular layers to be visible when opening the document # # Define two layers for RGB or Grayscale images and two layers for English or # German image captions. Output images and text on the various layers and # open the document with the RGB images and English captions visible. # # Required software: PDFlib/PDFlib+PDI/PPS 7 # Required data: grayscale and RGB images #
# This is where the data files are. Adjust as necessary. $searchpath = "../data"; $title = "Starter Layer";
# create a new PDFlib object $p = PDF_new();
$rgb = "nesrin.jpg"; $gray = "nesrin_gray.jpg";
PDF_set_parameter($p, "SearchPath", $searchpath);
# This means we must check return values of load_font() etc. PDF_set_parameter($p, "errorpolicy", "return");
# Open the document with the "Layers" navigation tab visible if (PDF_begin_document($p, "", "openmode=layers") == 0) { die("Error: " . PDF_get_errmsg($p)); }
PDF_set_info($p, "Creator", "PDFlib Cookbook"); $buf = $title . ' $Revision: 1.1.2.2 $'; PDF_set_info($p, "Title", $buf);
# Load the font $font = PDF_load_font($p, "Helvetica", "winansi", "");
if ($font == 0) { die("Error: " . PDF_get_errmsg($p)); }
# Load the Grayscale image $imageGray = PDF_load_image($p, "auto", $gray, ""); if ($imageGray == 0) { die("Error: " . PDF_get_errmsg($p)); }
# Load the RGB image $imageRGB = PDF_load_image($p, "auto", $rgb, ""); if ($imageRGB == 0) { die("Error: " . PDF_get_errmsg($p)); }
# Define all layers which will be used, and their relationships. # This should be done before the first page if the layers are # used on more than one page. #
# Define the layer "RGB" $layerRGB = PDF_define_layer($p, "RGB", "");
# Define the layer "Grayscale" which is hidden when opening the # document or printing it. $layerGray = PDF_define_layer($p, "Grayscale", "initialviewstate=false initialprintstate=false");
# At most one of the "Grayscale" and "RGB" layers should be visible $buf = "group={" . $layerGray . " " . $layerRGB . "}"; PDF_set_layer_dependency($p, "Radiobtn", $buf);
# Define the layer "English" $layerEN = PDF_define_layer($p, "English", "");
# Define the layer "German" which is hidden when opening the document # or printing it. $layerDE = PDF_define_layer($p, "German", "initialviewstate=false initialprintstate=false");
# At most one of the "English" and "German" layers should be visible $buf = "group={" . $layerEN . " " . $layerDE . "}"; PDF_set_layer_dependency($p, "Radiobtn", $buf);
# Start page PDF_begin_page_ext($p, 0, 0, "width=a4.width height=a4.height");
# Place the RGB image on the layer "RGB" PDF_begin_layer($p, $layerRGB); PDF_fit_image($p, $imageRGB, 100, 400, "boxsize={400 300} fitmethod=meet");
# Place the Grayscale image on the layer "Grayscale" PDF_begin_layer($p, $layerGray); PDF_fit_image($p, $imageGray, 100, 400, "boxsize={400 300} fitmethod=meet");
# Place an English image caption on the layer "English" PDF_begin_layer($p, $layerEN); $buf = "font=" . $font . " fontsize=20"; PDF_fit_textline($p, "This is the Nesrin image.", 100, 370, $buf);
# Place a German image caption on the layer "German". PDF_begin_layer($p, $layerDE); $buf = "font=" . $font . " fontsize=20"; PDF_fit_textline($p, "Das ist das Nesrin-Bild.", 100, 370, $buf);
PDF_end_layer($p);
PDF_end_page_ext($p, "");
PDF_end_document($p, "");
$buf = PDF_get_buffer($p); $len = strlen($buf);
header("Content-type: application/pdf"); header("Content-Length: $len"); header("Content-Disposition: inline; filename=hello.pdf"); print $buf;
?>
|