Remove scroll bars ..

Правя нещо като DBGridBottom който се позиционира под TDBGrid и взаимодейства с него ... и единия от хоризонталните скрол бар-ове ми е излишен, но @!#$%^! не мога да го махна. Как? :)


PS: Имам предвид скрол бар на TDBGrid ... ако съм писал неясно

-------------
Special killer double trouble triple extra nicotine monster!

За всички наследници на TCustomGrid
ScrollBars:= ssNone;

Ne syvsem, ili syvsem ne.

Za typiq DBGrid polovinata neshta ne sa publish-nati, i neshta kato LeftCol mojesh da im pravish samo TStringGrid(dbgrid1).leftcol i podobni (bachka, ma e krivo).

Това моето желано се прави със ShowScrollBars (май така се казваше функцията) - взема хендъл, Хорз/Верт, Тру/Фолс. Аз щях да я кръстя ToggleScrollVisibility, не ShowScrollBars :)

-------------
Special killer double trouble triple extra nicotine monster!

Ами те за това си има TCustomDBGrid - за да си наследиш компонента от него - правиш си TCustomDBGrid_blablabla и след това от него си правиш TDBGrid_blablabla като публикуваш само това което ти трябва.
Просто е - никой не наследява последните наследници на компонентите - освен ако нямаш достъп до TCustomXXXX.

---
Е т'ва е живот!