Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Размер шрифта в заголовках ListView 
V
    Опции темы
Mina
Дата 28.7.2010, 05:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 83
Регистрация: 11.11.2005

Репутация: нет
Всего: нет
При изменении размера шрифта в ListView (стиль vsReport)

Код

ListView1.Font.Size:= 14;


Меняется размер шрифта как в строках так и в заголовках колонок, что можно сделать чтобы у заголовков шрифт был постоянным, т.е. не изменялся при изменении размера шрифта строк


Это сообщение отредактировал(а) Mina - 28.7.2010, 05:03
PM MAIL   Вверх
Amphiluke
Дата 28.7.2010, 10:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


   ☽
***


Профиль
Группа: Завсегдатай
Сообщений: 1253
Регистрация: 26.8.2009

Репутация: 5
Всего: 112
Можно пойти в обход VCL.
Например, если вы не меняете шрифт самой формы или другого контрола, то можно передать Handle шрифта этого контрола окну Header в вашем ListView.
Код

ListView1.Font.Size:= 14; // изменяем
SendMessage(GetWindow(ListView1.Handle, GW_CHILD), WM_SETFONT,
  Integer(Form1.Font.Handle), 1); // восстанавливаем только для Header'а

Есть и другие пути, но этот, наверное, один из коротких.
PM   Вверх
Mina
Дата 28.7.2010, 11:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 83
Регистрация: 11.11.2005

Репутация: нет
Всего: нет
Amphiluke, спасибо!

Добавлено через 4 минуты и 33 секунды
Цитата(Amphiluke @  28.7.2010,  10:53 Найти цитируемый пост)
Integer(Form1.Font.Handle), 1); // восстанавливаем только для Header'а

объясните пожалуйста, почему последний параметр SendMessage равен 1
PM MAIL   Вверх
Amphiluke
Дата 28.7.2010, 12:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


   ☽
***


Профиль
Группа: Завсегдатай
Сообщений: 1253
Регистрация: 26.8.2009

Репутация: 5
Всего: 112
Цитата(Mina @  28.7.2010,  15:31 Найти цитируемый пост)
объясните пожалуйста, почему последний параметр SendMessage равен 1

Чтобы произошла немедленная перерисовка окна после смены шрифта.
Вы загляните в Windows SDK
Цитата

The low-order word of lParam specifies whether the control should be redrawn immediately upon setting the font. If this parameter is TRUE, the control redraws itself. 


Добавлено через 12 минут и 50 секунд
Впрочем, и с FALSE тоже работает. smile 
PM   Вверх
Mina
Дата 29.7.2010, 03:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 83
Регистрация: 11.11.2005

Репутация: нет
Всего: нет
Еще раз спасибо!  smile 

Это сообщение отредактировал(а) Mina - 29.7.2010, 03:29
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.1737 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.