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); /* 始めに、フォームフィールドのグループ"colors"を生成する */ $p->create_fieldgroup("colors", "fieldtype=radiobutton"); $p->fit_textline("Choose the paper plane color:", $llx, $lly, ""); $lly-=40; /* グレーの円を示す"radiobutton"タイプのフォームフィールドを生成する。 * (buttonstyle=circle bordercolor={gray 0.8}) * 全てのフィールドは"colors"フィールドグループに属している。 * それぞれのラジオボタンフィールド名に接頭辞"colors."を付けて関連付ける。 * 一番初めのラジオボタンをアクティブにする(currentvalue={On}) * ツールチップは常に、グループで共有する。 */ $optlist = "buttonstyle=circle bordercolor={gray 0.8}"; $p->create_field($llx, $lly, $llx + $width, $lly + $height, "colors.standard", "radiobutton", $optlist . " currentvalue={On} " . "tooltip={Select a color for the paper plane}"); /* ボタンのラベルを出力する */ $p->fit_textline("Standard", $llx + 30, $lly, "boxsize={0 " . $height . "} position={left center}"); $lly-=40; $p->create_field($llx, $lly, $llx + $width, $lly + $height, "colors.yellow", "radiobutton", $optlist); $p->fit_textline("Yellow", $llx + 30, $lly, "boxsize={0 " . $height . "} position={left center}"); $lly-=40; $p->create_field($llx, $lly, $llx + $width, $lly + $height, "colors.blue", "radiobutton", $optlist); $p->fit_textline("Blue", $llx + 30, $lly, "boxsize={0 " . $height . "} position={left center}"); $lly-=40; $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_radiobutton.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; ?>