Paginación datagrid

[Mariolarr]

Hola de nuevo, he hecho las modificaciones que me has dicho pero me sigue ocurriendo lo mismo, mira:

Código Delphi [-]
procedure TWebForm2.CambiarPaginaAux;
var
  Cadena: BdpCommand;
  sSQL: string;
begin
  Trans := MyConeccion.BeginTransaction();

  sSQL := 'select Art_Codi, Art_Desc, Art_PVP1 from Articulos_Web'; 
  Cadena := BdpCommand.Create(sSQL, MyConeccion, Trans);
  CatalogoReader := Cadena.ExecuteReader;

  DataGrid1.VirtualItemCount := 15000;
  DataGrid1.DataSource:=CatalogoReader;
  DataGrid1.DataBind;

  CatalogoReader.Close;
  Trans.Commit;
  Trans.Free;
end;

Y el de Cambio de pagina

Código Delphi [-]
 DataGrid1.CurrentPageIndex :=e.NewPageIndex;
 CambiarPaginaAux;

Las dos variables las sigo teniendo como globales