Código Delphi [-] SendMessage(DBGrid1.Handle, WM_HSCROLL, SB_PAGERIGHT, 0);
SendMessage(DBGrid1.Handle, WM_HSCROLL, SB_PAGERIGHT, 0);