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

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