Функция переноса слов с параметром ширины страницы или текстового блока</font>
| Код |
function wraptext($text, $wrapmargin) {
$rettext = "";
$linebuf = "";
$linelen = 0;
$tok = split("[ \t]", $text);
$numtok = count($tok);
for ($i = 0; $i < $numtok; $i++) {
$elem = $tok[$i];
$elemlength = strlen($elem) + 1;
if ($linelen + $elemlength > $wrapmargin) {
$rettext = $rettext . $linebuf . "\n";
$linebuf = "";
$linelen = 0;
}
$pos = strrpos($elem, "\n");
if ($pos) {
$before = substr($elem, 0, $pos);
$after = substr($elem, $pos);
$rettext = $rettext . $linebuf . " " . $before . "\n";
$linebuf = $after;
$linelen = strlen($after);
}
else {
$linebuf = $linebuf . " " . $elem;
$linelen = $linelen + $elemlength;
}
}
return $rettext;
} |
|