set_option("errorpolicy=return"); $p->set_option("stringformat=utf8"); $p->set_option("searchpath={" . $searchpath . "}"); if ($p->begin_document($outfile, "") == 0) throw new Exception("Error: " . $p->get_errmsg()); $p->set_info("Creator", "PDFlib Cookbook"); $p->set_info("Title", $title); $font = $p->load_font("Helvetica", "winansi", ""); if ($font == 0) throw new Exception("Error: " . $p->get_errmsg()); /* ページを始める */ $p->begin_page_ext(0, 0, " width=a4.width height=a4.height"); $p->setfont($font, 12); /* チェックボックスのためのテキストのタイトルを出力する */ $p->fit_textline("Choose paper plane extras:", $llx, $lly, ""); $lly-=40; /* チェックボックスのフォームフィールドを作成する。 * チェックボックス内は青のバツ印で表示する * (buttonstyle=cross fillcolor={rgb 0.25 0 0.95}) * 背景はライトブルー(backgroundcolor={rgb 0.95 0.95 1}) * 境界線は黒色 (bordercolor={gray 0}). * ツールヒントを提供する. * 初めのチェックボックスを有効にする (currentvalue={On}). */ $optlist = "buttonstyle=cross bordercolor={gray 0} " . "backgroundcolor={rgb 0.95 0.95 1} fillcolor={rgb 0.25 0 0.95}"; $p->create_field($llx, $lly, $llx + $width, $lly + $height, "paper", "checkbox", $optlist . " currentvalue={On}"); /* チェックボックスのラベルを出力する */ $p->fit_textline("Glossy paper", $llx + 30, $lly, "boxsize={0 " . $height . "} position={left center}"); $lly-=30; $p->create_field($llx, $lly, $llx + $width, $lly + $height, "color", "checkbox", $optlist); $p->fit_textline("Rainbow colors", $llx + 30, $lly, "boxsize={0 " . $height . "} position={left center}"); $lly-=30; $p->create_field($llx, $lly, $llx + $width, $lly + $height, "perforation", "checkbox", $optlist); $p->fit_textline("Perforation", $llx + 30, $lly, "boxsize={0 " . $height . "} position={left center}"); $lly-=30; $p->create_field($llx, $lly, $llx + $width, $lly + $height, "stability", "checkbox", $optlist); $p->fit_textline("High stability", $llx + 30, $lly, "boxsize={0 " . $height . "} position={left center}"); $p->end_page_ext(""); $p->end_document(""); $buf = $p->get_buffer(); $len = strlen($buf); header("Content-type: application/pdf"); header("Content-Length: $len"); header("Content-Disposition: inline; filename=form_checkbox.pdf"); print $buf; } catch (PDFlibException $e) { echo("PDFlib exception occurred:\n". "[" . $e->get_errnum() . "] " . $e->get_apiname() . ": " . $e->get_errmsg() . "\n"); exit(1); } catch (Exception $e) { echo($e->getMessage()); exit(1); } $p = 0; ?>