Delphi - guardar un numero en 2 campos,recorrer un lisbbox

Filtrado por el usuario: Alejandro
<<>>
Filtrado por el usuario 'Alejandro' (Eliminar fitro)
 
Vista: