Delphi - TADOTable.Last no me regresa el ultimo registro

Hola.

Mi problema es el siguiente: En un TMainMenu hay un elemento que se llama alta de clientes, y al hacer click en este elemento llamo a un form que se llama altasclientes donde se van a capturar los datos del cliente y genero el folio del cliente al hacer click en el este elemento del menu de la siguiente forma:

ADOTable1.Active:=true;
ADOTable1.Last;
z:=ADOTable1.fieldbyname('folio').AsString;
ADOTable1.Active:=false;
x:=strtoint(z)+1;

ADOTable1 se encuentra en el form donde se encuentra el menu.

el problema es que el valor de x es 12 y el ultimo folio es 16. Esto quiere decir que no me esta regresando el ultimo registro.

Hice la prueba con un TADOQuery para obtener el ultimo registro
ADOQuery1.Active:=true;
ADOQuery1.ExecSQL;
z:=ADOQuery1.FieldValues['ultimo'];
x:=strtoint(z)+1;

la sentencia SQL era "SELECT MAX(folio) AS ultimo FROM CLIENTES ;" y si me obtenia el ultimo registro, capturaba los datos bien pero al volver a dar click en el elemento del menu de alta de clientes me mostraba el folio que acababa de capturar.

Si alguien me puede ayudar agradecere su ayuda