Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ну где взять?


AlexP ©   (2002-04-12 19:54:00) 

Подскажите, где взять компоненты типа TLabel и TQrText только с возможностью повернуть текст на 90 градусов.


kopachev   (2002-04-13 03:21:00) [1]

В библиотеке RXLib есть ф-ия CreateRotatedFont.

Unit
VCLUtils
Declaration
function CreateRotatedFont(Font: TFont; Angle: Integer): HFont;
Description
Создает "наклонный" шрифт, основываясь на свойствах объекта шрифта,
переданного в качестве параметра Font. Угол наклона нового шрифта по
отношению к горизонтали задается параметром Angle.

(в Help"е есть пример использования этой ф-ии).

Чтобы вывести текст вертикально в ячейке StringGrid нужно:
1. Устанавливаем св-во DefaultDrawing в False
2. В обработчике события OnDrawCell создаем "вертикальный" шрифт и
выводим им нужный текст.
(Подробнее см. Help)

Ответил ISP aral@zin.ru


Anatoly Podgoretsky   (2002-04-12 20:12:00) [2]

www.qusoft.com


Наверх

Титульная страница Поиск, карта сайта Написать письмо