Пара вопросов про TStringGrid

Для выравнивания колонок я вычисляю ширину процентно (относительно размера главной формы)

В главной форме при событии OnResize пишу:
// SList = TStringGrid

SList->ColWidths[0] = int (((MForm->Width)*25)/100)-3; // 25% от общего розмера окна
SList->ColWidths[1] = int (((MForm->Width)*50)/100)-3; // 50%
SList->ColWidths[2] = int (((MForm->Width)*15)/100)-3; // 15%
SList->ColWidths[3] = int (((MForm->Width)*10)/100)-3; // 10%

Приходиться к ширине каждой колонке добовлять "-3", иначе они не влазят и появляется горизонтальная прокрутка, что очень нежелательно.
Вопрос номер 1: Почему так происходит ? Если такую операцию проводить с DBGrid например, то этого не происходит.

Идем дальше.
Если мой список очень длинный (много строк), то появляется вертикальная прокрутка, и пропорциональность таблицы снова рушиться. (т.е. опять горизонтальная прокрутка появляется)

Вопрос 2: Можно ли добавить верт. прокрутку к TStringGrid таким образом, чтобы она была НЕ активной в тот момент, когда в ней нет нужды.

PS. Запретить гориз. прокрутку нельзя, иногда она будет необходима.