Здравствуйте vav, Вы писали:
vav>Здравствуйте zenbka, Вы писали:
Z>> Есть DBGrid. Все данные умещаются в сетку и как бы скролинг не нужен.. но.. как избавиться от него не знаю. В TCustomGrid есть свойство ScrollBars в котором можно явно указать нужное значение. TDBGrid наследуется от TCustomGrid, однако этого свойства нет.. Пожалуйста, подскажите как сделать красиво :)
vav>uses ShellApi;
vav>var vav> I:tagSCROLLINFO;
vav> GetScrollInfo(DBGrid1.Handle,SB_VERT,I); vav> I.fMask := SIF_DISABLENOSCROLL; vav> SetScrollInfo(DBGrid1.Handle,SB_VERT,I,TRUE)
