Avanzar de registro en consulta a MySQL

[jlrdz]

Como puedo avanzar de registro en la consulta que hice a la base de datos?

Estoy utilizando el componente Mydac para conectarme a MySQL, envio mi consulta de la siguiente manera:

Código Delphi [-]
procedure TfrmUsuarios.FormCreate(Sender: TObject);
var
  total:integer;

begin
//esta consulta a la base de datos la hago bien y me regresa datos
frmLogin.query.Close;
frmLogin.query.SQL.Clear;
frmLogin.query.SQL.Text:='select * from usuarios';
frmLogin.query.Open;

total:=frmLogin.query.RecordCount;

  if total>=0 then
  begin
  edtNumero.Text:=frmLogin.query.FieldValues['numero_usuario'];
  edtNombre.Text:=frmLogin.query.FieldValues['nombre_usuario'];
  edtTipo.Text:=frmLogin.query.FieldValues['tipo'];
  btnCambiarpass.Visible:=True;
  end
  else
  begin
  
    showmessage('No existen usuarios');

  end;

end;

Quiero crear mis propios botones como los que se usan en DBNavigator, uno en el cual yo de click me avanze al siguiente registro de todos los que me regresó la consulta y así poderlos mostrar en los TEdit

Código Delphi [-]
procedure TfrmUsuarios.bitSiguienteClick(Sender: TObject);
begin

edtNumero.Text:=frmLogin.query.FieldValues['numero_usuario'];
  edtNombre.Text:=frmLogin.query.FieldValues['nombre_usuario'];
  edtTipo.Text:=frmLogin.query.FieldValues['tipo'];
  btnCambiarpass.Visible:=True;
end;

Si lo dejo así como está, me llena los campos pero siempre con el primer registro y lo que quiero es que avanze al siguiente, de misma manera quiero hacer los demas botones para el registro anterior,primero y último.

Espero haberme explicado bien.

Saludos.