Delphi - ¿como eliminar el primer y ultimo dgito de una cantidad en una funcion?

Filtrado por el usuario: Norberto
Filtrado por el usuario 'Norberto' (Eliminar fitro)
 
Vista: