mostrar informacion en un DBEdit
 

Hola, estoy realizando una aplicacion en delphi 7 y MySQL.
Estoy utilizando varios DBEdit para mostrar informacion.
Lo que hago es traer los datos de la tabla 'empleados' y mostrarlos en los distintos DBEdit (por ejemplo en DBEdit1 muestro el apellido, en DBEdit2 el nombre, en DBEdit3 el domicilio, etc).

Cada vez que hago click en el Button1_siguiente paso al proximo registro, mostrando los datos de otro empleado (el codigo que utilizo en el button1 es: ADOQuery1.Next).
Lo que quiero lograr es que cuando llegue al ultimo registro de la tabla y vuelva a pulsar el Button1_siguiente me lleve de nuevo al primer registro.

El Button2 _anterior hace lo contrario (ADOQuery1.Prior), muestra el registro anterior. En este caso quiero que cuando este en el primer registro y haga click en en Button2_Anterior me lleve al ultimo registro.

Espero haber sido claro. Gracias por su atencion.

Hola
Boton next:
Al llegar al final, regresa al primero:

Código Delphi [-]
  ADOQuery1.Next;
  If DataSource1.DataSet.Eof then
  ADOQuery1.First;

Si no se tiene datasource en la linea IF:

Código Delphi [-]
 ADOQuery1.DataSetField.DataSet.Eof

Boton Prior:
Al Llegar al primer registro, va al ultimo:

Código Delphi [-]
 ADOQuery1.Prior;
 If DataSource1.DataSet.Bof then
 ADOQuery1.Last;

Si no se tiene datasource en la linea IF:

Código Delphi [-]
 ADOQuery1.DataSetField.DataSet.Bof

Saludos

gracias
 

Hola Caral, gracias por tu ayuda.
Tu solución funciono muy bien.

Nuevamente gracias y saludos