| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как изменить высоту заголовка в SysListView32??
zxc © (2003-11-14 12:49:00)
как изменить высоту заголовка в SysListView32??
спасибо.
zxc (2003-11-14 14:49:00) [1]
ник немного спутал =)
ещё раз, big thx!
qwe (2003-11-14 14:48:00) [2]
(to Игорь Шевченко)
точно, big thx!
Игорь Шевченко (2003-11-14 14:39:00) [3]
procedure TForm1.Button2Click(Sender: TObject);
var
hHeader : THandle;
HeaderRect : TRect;
HeaderHeight : Integer;
begin
HeaderHeight := -FHeaderFont.Height + 8;
hHeader := SendMessage(ListView1.Handle, LVM_GETHEADER, 0, 0);
GetWindowRect(hHeader, HeaderRect);
with HeaderRect do
SetWindowPos(hHeader, 0, 0, 0, Right - Left, HeaderHeight,
SWP_NOZORDER);
SendMessage (hHeader, WM_SETFONT,
FHeaderFont.Handle, LPARAM(true));
SendMessage (ListView1.Handle, LVM_SCROLL,
0, 0);
ListView1.Invalidate();
end;
Примерно так...
zxc (2003-11-14 13:23:00) [4]
> Prov © Какую высоту ? Какого заголовка ? У него есть видимый заголовок ? Чего-то я не могу понять, может я дурак ?
чесно говорю НЕ ЗНАЮ.
(to Игорь Шевченко)
смотрел справку и MSDN не нашёл я этой инфы, тут люди советуют создать ImageList с пусттой картинкой и заданной высотой, но у меня чесно говоря не вышло, какой был высоты заголовок такой и остался.
Игорь Шевченко (2003-11-14 13:14:00) [5]
Prov © (14.11.03 13:10)
В режиме vsReport у SysListView32 есть заголовок.
И личная просьба - почаще справку смотреть.
Prov (2003-11-14 13:10:00) [6]
Какую высоту ? Какого заголовка ? У него есть видимый заголовок ?
Чего-то я не могу понять, может я дурак ?
| |
