Question

我正在使用PHP使用TCPDF。我正在尝试制作一个必须长只有一页的PDF文档。该文档包括一个表，该表的数据具有动态确定的行数。

我想做的就是给此表提供最大高度（例如10厘米），并在超出此限制时缩小表的字体大小。这样，数据仍然存在，但是文档将适合一页。这可能吗？我尝试使用WriteHTML()方法，但是似乎忽略了我给它的高度。（也就是说，如果数据结束，它只会继续写入而不是切断数据。）

这可能吗？

Answer 1

执行此操作的一种方法是设置单个MultiCell或Cell输出的大小。涉及很多视觉调整，但是您可以非常精确地进行调整。为了简单起见，我创建了一个具有固定行高的粗略示例。基本上，这个主意是将(Multi)Cells参数设置为0，将最大高度和位置$ln设置在上一个高度的右边。（或在每次调用之前设置坐标。）您可以看到一个此处的示例输出文件：https://s3.amazonaws.com/rrbits/maxheight.pdf

MultiCell有一个autofit设置，它将为您处理缩小的字体，我在MultiCell示例中使用了该设置。一个潜在的警告是它将允许包装。

Cell没有autofit参数，但是您可以通过将字体大小设置为合理的最大值，使用GetStringWidth检查单元格字符串的宽度并减小字体大小直至适合它来模拟它。 [编辑：我这里不做，但是在输出单元格之后恢复字体大小是个好主意，否则您可能会得到一些意想不到的结果。]（请参见第105行的循环）。（Cell确实有一些字体扩展选项，请参见TCPDF example 004，但它们并没有完全按照您的要求进行。）

<?php
require_once('TCPDF-6.2.17/tcpdf.php');
// create new PDF document
$pdf = new TCPDF('L', 'mm', array(130,130), true, 'UTF-8', false);

$pdf->SetFont('times', '', 8);
$pdf->SetAutoPageBreak(TRUE, 5);

//Generating a random table for testing.
$table = [
  ['Name','Description','md5'],
];
$rows = rand(10,30);
//$rows = rand(3,5);
for($i = 0; $i < $rows; $i++) {
  $table[] = array(
    'Sector '.rand(1,10000),
    str_repeat('An Apple', rand(2,6)),
    md5(rand(1,100000)),
  );
}

$pdf->addPage();

$pdf->Write(2, 'MultiCell Example');
$pdf->Ln();
$pdf->SetFont('times', '', 8);

$column_widths = array(
  20,
  60,
  30,
);

//Total table should only be 10cm tall.
$maxheight = 100/count($table);
if($maxheight > 10) {
  $maxheight = 10;
}
foreach($table as $index => $row) {
  if($index == 0) {
    $pdf->SetFillColor(230,230,255);
  } else {
    if( ($index&1) == 0 ) {
      $pdf->SetFillColor(210,210,210);
    } else {
      $pdf->SetFillColor(255,255,255);
    }
  }
  $pdf->SetX(10);
  $currenty = $pdf->GetY();
  foreach($row as $index => $column) {
    $pdf->MultiCell(
      $width = $column_widths[$index],
      $minheight = $maxheight,
      $text = $column,
      $border = 'B', //Border bottom
      $align = 'L',
      $fill = true,
      $ln = 0, //Move to right after cell.
      $x = null,
      $y = null,
      $reseth = true,
      $stretch = 0,
      $ishtml = false,
      $autopadding = true,
      $maxheight,
      $valign = 'T',
      $fitcell = true);
  }
  $pdf->SetY($currenty + $maxheight);
}

$pdf->addPage();

$pdf->SetFont('times', '', 8);
$pdf->Write(2, 'Cell Example');
$pdf->Ln();
$pdf->SetFont('times', '', 8);

$maxheight = 100/count($table);
if($maxheight > 8) {
  $maxheight = 8;
}

$maxfontsize = 10;
$pdf->SetFontSize($maxfontsize);

foreach($table as $index => $row) {
  if($index == 0) {
    $pdf->SetFillColor(230,230,255);
  } else {
    if( ($index&1) == 0 ) {
      $pdf->SetFillColor(210,210,210);
    } else {
      $pdf->SetFillColor(255,255,255);
    }
  }
  $pdf->SetX(10);
  $currenty = $pdf->GetY();
  foreach($row as $index => $column) {
    //Reduce the font size to fit properly.
    $pdf->SetFontSize($csize = $maxfontsize);
    //0.2 step down font until it fits the cell.
    while($pdf->GetStringWidth($column) > $column_widths[$index]-1 ) {
      $pdf->SetFontSize($csize -= 0.2);
    }
    $pdf->Cell(
      $width = $column_widths[$index],
      $cellheight = $maxheight,
      $text = $column,
      $border = 'B', //Border bottom
      $ln = 0,
      $align = 'L',
      $fill = true,
      $stretch = 1,
      $ignore_min_height = true,
      $calign = 'T',
      $valign = 'T');
  }
  $pdf->SetY($currenty + $maxheight);
}

$pdf->Output(dirname(__FILE__).'/maxheight.pdf', 'F');

附录：使用WriteHTML的替代方法

您可以使用WriteHTML执行此操作的一种方法是使用startTransaction开始事务，为整个表设置基本字体并编写HTML，然后检查页数。如果遇到自动分页符，请回滚事务并尝试使用较小的字体。否则，提交事务。

我已使用上面的输出作为示例更新了上面的链接：

//Example with WriteHTML.
$pdf->AddPage();
$pdf->SetFont('times', '', 8);
$pdf->Write(2, 'WriteHTML Example');
$pdf->Ln();
$pdf->SetFont('times', '', 8);

//Max height of 100 mm.
$maxy = $pdf->GetY()+100;
$fontsize = 14;
//Make table markup.
$tablehtml = '<table cellspacing="2" style="font-family: times; font-size:_FONTSIZE_px;">';
foreach($table as $index => $row) {
  if($index == 0) {
    $rowstyle = ' background-color: rgb(230,230,255); '.
      'font-size: 110%; font-familt: times; font-weight: bold;'.
      'border-bottom: 1px solid black;';
  } else {
    if( ($index&1) == 0 ) {
      $rowstyle = 'background-color: rgb(210,210,210);';
    } else {
      $rowstyle = 'background-color: white;';
    }
  }
  $tablehtml .= "<tr style=\"$rowstyle\">";
  foreach($row as $column) {
    $tablehtml .= "<td>$column</td>";
  }
  $tablehtml .= '</tr>';
}
$tablehtml .= '</table>';

//Transaction loop.
$numpages = $pdf->getNumPages();
$done = false;
while(!$done) {
  $pdf->startTransaction(true);
  $pdf->SetFont('times', '', 14);
  $outtable = str_replace('_FONTSIZE_', $fontsize, $tablehtml);
  $pdf->writeHTML($outtable);
  if($pdf->getNumPages() > $numpages || $pdf->GetY() > $maxy) {
    //If we encountered a page break or exceeded the desired maximum height
    //rollback the transaction.
    $pdf->rollbackTransaction(true);
    $fontsize -= 0.4;
    //Larger font steppings will be less precise, but faster.
  } else {
    $pdf->commitTransaction(true);
    $done = true;
  }
}

是否可以使TCPDF元素具有最大高度？

1 个答案: