Алгоритм переноса слов (на канве битмапа или принтера). Как/где?

← →
BlackTiger © (2004-05-11 14:12) [0]

Имеется у меня некий большой текст. Мне нужно прорисовать его на канвасе с переносом по словам (по слогам не надо! :) ), задавая только размер области, шрифт и его размер.

Может у кого есть готовая процедура? Что-то у меня бред получается, а время поджимает.

← →
MU (2004-05-11 14:16) [1]

DrawText DT_WORDBREAK?

← →
panov © (2004-05-11 14:23) [2]

Например:
var
R: TRect;
begin
...
PaintBox1.Canvas.Font := ...
R := PaintBox1.ClientRect;
DrawText(PaintBox1.Canvas.Handle,PChar(MyStr),Length(MyStr),R,DT_WORDBREAK);

← →
pasha_golub © (2004-05-11 14:34) [3]

Вообщем у DrawText есть пара недостатов. Если не устроит дайте знать, я когда то свою реализацию писал

← →
panov © (2004-05-11 14:48) [4]

http://delphimaster.net/view/15-1082647615/

← →
BlackTiger © (2004-05-11 15:47) [5]

Господа, где это вы видели у TBitmap.Canvas или TPrinter.Canvas метод DrawText?

← →
pasha_golub © (2004-05-11 16:33) [6]

BlackTiger © (11.05.04 15:47) [5]
Так-с, это становится совсем интересно. :-)

Windows.DrawText

pasha_golub © (11.05.04 16:33) [6]

Только вот ногами бить не надо, да! :)
Всё понял - исправлюсь (правда сначала попробую...).
Даже в голову не пришло, что ОНО может быть ТАМ. Расслабился под .NET-ом.

Вот тут еще можешь посмотреть: http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=171
Великолепный примерчик от Григорьева Антона

Алгоритм переноса слов (на канве битмапа или принтера). Как/где? Найти похожие ветки