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

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

Как у TListBox убрать линейку прокрутки?


Вид ©   (2005-08-23 03:24:00) 

А то дизайн портит. Для прокрутки используются более симпатичные элементы управления.


Джо   (2005-08-23 03:41:00) [1]


>  [2] Вид   (23.08.05 03:32)
> Тебя за то что не в потрепаться постишь.

А нужно в "потрепаться"? Извини, забыл у тебя спросить.

Впрочем, дело твое, хочешь плоди уродцев с плохим интерфейсом.
По сабжу. Задачу можно решить написанием наследника TListBox с перекрытым CreateParams. Например, так:

 TUglyListBox = class (TListBox)
 protected
   procedure CreateParams(var Params: TCreateParams); override;
 end;
 implementation

procedure TUglyListBox.CreateParams(var Params: TCreateParams);
begin
 inherited;
 Params.Style := Params.Style and not WS_VSCROLL
end;


Вид   (2005-08-23 03:32:00) [2]


> Джо ©   (23.08.05 03:25) [1]
> Фтопку.

Тебя за то что не в потрепаться постишь.


Джо   (2005-08-23 03:25:00) [3]

Фтопку.


Наверх

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