Hola,
A bote pronto, usar la función "StringReplace" podría servir. Sería cuestión de reemplazar el caracter "$" por una cadena vacía, lo que equivale a quitarlo del medio:
Código Delphi
[-]
s := StringReplace('$248968', '$', '', [rfReplaceAll];
"s" contendrá la cadena "248968".