Как изменить число фиксированных колонок в TDbGrid

procedure TForm1.Button1Click(Sender: TObject);
begin
              TStringGrid(DbGrid1).FixedCols := 2;
end;