delphi dbgrid去除滚动条

//dbgrid去除滚动条 在form.show事件里写
EnableScrollBar(DBGrid1.Handle, SB_VERT, ESB_DISABLE_BOTH);
ShowScrollBar(dbgrid1.Handle,SB_BOTH,false);//去掉水平和垂直
ShowScrollBar(dbgrid1.Handle, SB_VERT, false) ;//去掉垂直