Показать сообщение отдельно
  #10  
Старый 10.10.2012, 14:19
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Помидоркин
[code]Только логику разработчиков Дельфи понять не могу.
TextRect(Rect, x, y, [Текст])
Если мы выводим текст ограниченный прямоугольником - Rect, то координаты x, y логичнее было бы задавать относительно Rect.LeftTop, а так получается:
Код:
  MyRect:= Rect(50, 50, 200, 90);
  TextRect(MyRect, MyRect.Left+6, MyRect.Top+6, 'Проба');
Тут скорее логика не разработчиков Дельфи, а разработчиков Windows, так метод TCanvas.TextRect использует API-функцию ExtTextOut.
API-функция ExtTextOut выводит на канву указанный текст в указанную позицию, при этом эта функция может опционально принимать в качестве параметра прямоугольник (RECT) которым при указании опции ETO_CLIPPED будет ограничиваться область вывода текста, если же эта опция не указана, то область вывода текста ничем не ограничивается. Правда к методу TCanvas.TextRect это не относится, так как он всегда указывает опцию ETO_CLIPPED (т.е. всегда с обрезкой).
Вот и вся логика.

И по моему даже наоборот было бы странно, если бы при включении опции ETO_CLIPPED нужно было бы подгонять координаты X и Y под прямоугольник.
Ответить с цитированием