СообЧа > База Знаний > Программирование > Delphi

Вопрос

Как убрать VerticalScrollBar из TListBox навсегда?

Ответ

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

Leonid Troyanovsky



Copyright © 2000-2004 Сообщество Чайников
Контактная информация