pues no se si el TParser de delphi te pueda ayudar, aqui hay una liga para que veas como funciona:
TParser
o tambien hacerlo a mano:
Código Delphi
[-]
var
begin
Cad := '25 12.5 5';
Posicion := Pos(' ', Cad);
delete(Cad, 1, Posicion);
Posicion := Pos(' ', Cad);
delete(cad, Posicion, Length(Cad)-Posicion);
ShowMessage(Cad);
end;