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

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

Как отключить гор.скроллбар у ListView? [D7, XP]


Aleks ©   (2009-10-16 13:11:00) 

Как отключить гор.скроллбар у ListView? В гугле койчево накопал, но ничего не пашет :( Помогите плиз, кто знает как отключить.. Спасибо!


Aleks   (2009-10-19 13:20:00) [1]

нашел такой-код:
type
TNoHScrollListview = Class( TListview )
private
Procedure WMNCCalcSize( Var msg: TMessage ); message WM_NCCALCSIZE;
end;

procedure TNoHScrollListview.WMNCCalcSize(var msg: TMessage);
var
style: Integer;
begin
style := getWindowLong( handle, GWL_STYLE );
If (style and WS_HSCROLL) <> 0 Then
SetWindowLong( handle, GWL_STYLE, style and not WS_HSCROLL );
inherited;
end;
но куда его втыкнуть без понятия.. :(


Andy BitOff   (2009-10-17 18:49:00) [2]

http://tinyurl.com/ygyh3c6


Aleks   (2009-10-17 11:07:00) [3]

LVM_SETCOLUMNWIDTH and LVSCW_AUTOSIZE - неизв.идентификатор :(


Aleks   (2009-10-16 16:11:00) [4]

Спасибо за код! Бум пробывать..


гугль   (2009-10-16 14:45:00) [5]

for i := 0 to ListView.Columns.Count-1 do
 ListView.Perform(LVM_SETCOLUMNWIDTH, i, LVSCW_AUTOSIZE);

;)


Германн   (2009-10-16 14:15:00) [6]


> clickmaker ©   (16.10.09 13:13) [1]
>
> > В гугле койчево накопал
>
> и чевотам?

Сплошной XXX
:)


clickmaker   (2009-10-16 13:13:00) [7]

> В гугле койчево накопал

и чевотам?


Наверх

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