Как убрать HSCROLL у DBGRID?

Delphi , Компоненты и Классы , TScrollBox

Как убрать HSCROLL у DBGRID?

Нужные нам свойства существуют, но вынесены в секцию Protected предка DBGrid: TCustomGrid. Наиболее правильным способом было бы создание класса наследника от TDBGrid с выводом ScrollBars в секцию Public, но можно обойтись и без этого следующим способом:

Code:



        Type TFake=class(TCustomGrid);

         

        implementation

         

        {$R  *.dfm}

         

        procedure TForm1.Button1Click(Sender:  TObject);

        begin

        TFake(DBGrid1).ScrollBars:=ssVertical;

        end;

Автор: Vit (www.delphist.com, www.drkb.ru, www.unihighlighter.com, www.nevzorov.org)
Взято с Vingrad.ru http://forum.vingrad.ru

Статья Как убрать HSCROLL у DBGRID? раздела Компоненты и Классы TScrollBox может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

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

:: Главная :: TScrollBox ::

19.04.2024 18:40:59/0.036985158920288/2