Código Delphi [-] Query1.Next; if (Query1.Last) Then begin ShowMessage('Estamos en el último registro'); end; Query1.Prior;
Query1.Next; if (Query1.Last) Then begin ShowMessage('Estamos en el último registro'); end; Query1.Prior;