Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > TLogFont (вывод текста по 90 градусов)

Автор: Delphist 7.11.2005, 16:37

Перед мной встала следующая задача:

Есть прямоугольник (в вертикальном расположении) известна его ширина - width и высота - height. Есть текст, хрянящийся в переменной fRawName. Необходимо вывести этот текст в этот прямоугольник см.рис.
Как все это реализовать программно желательно в виде процедуры (с параметрами height: integer; width: integer; fRawName: text)?

Автор: _hunter 7.11.2005, 17:13

http://rtfm.vn.ua/prog/delphi/delphi1/answer01.htm
http://www.codenet.ru/progr/delphi/features/ugl_capt.php
http://xpoint.ru/forums/internet/html_css/css/thread/33464.xhtml

Автор: Delphist 7.11.2005, 17:29

Цитата(_hunter @ 7.11.2005, 17:13)

http://rtfm.vn.ua/prog/delphi/delphi1/answer01.htm
http://www.codenet.ru/progr/delphi/features/ugl_capt.php
http://xpoint.ru/forums/internet/html_css/css/thread/33464.xhtml

Данные ссылки показывают решение только части вопроса (перевернуть текст под углом), а мне нужно разместить данный текст в заданном прямоугольнике.

Автор: _hunter 7.11.2005, 17:53

а для этого у канвы есть TextRect()

Автор: Delphist 7.11.2005, 18:34

Цитата(_hunter @ 7.11.2005, 17:53)

а для этого у канвы есть TextRect()

Примерчик под мой рисунок не могли бы показать.

Автор: _hunter 7.11.2005, 19:01

Цитата

Примерчик под мой рисунок не могли бы показать.

а что с ним? или пример использования TextRect() нужен? так вот:

Код


void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TRect TheRect;

  TheRect = Rect(10,10,100,100);
  Canvas->TextRect(TheRect, 10, 10, "Hello World");
}

Автор: Delphist 8.11.2005, 13:52

Цитата(_hunter @ 7.11.2005, 19:01)

Цитата

Примерчик под мой рисунок не могли бы показать.

а что с ним? или пример использования TextRect() нужен? так вот:

Код


void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TRect TheRect;

  TheRect = Rect(10,10,100,100);
  Canvas->TextRect(TheRect, 10, 10, "Hello World");
}

Нужен рабочий пример вывода текста в заданный прямоугольник. Вообщем так как показано у меня на рисунке.

P.S. Текст может быть произвольным.

Автор: _hunter 8.11.2005, 14:11

Цитата

Нужен рабочий пример вывода текста в заданный прямоугольник

дык вон он.

а если нужно

Цитата

Вообщем так как показано у меня на рисунке.

то показать не могу -- ибо нету.