Wenn man es unbedingt mit StringReplace machen will, ginge auch sowas:
Delphi-Quellcode:
function StripPlusMinusAndSpace(const Str: string): integer;
begin
Result := StringReplace(Str, ' ', '', [rfReplaceAll]);
if (Result[1] = '+') or (Result[1] = '-') then
Delete(Result, 1, 1);
end;
Spart zumindest 2x StringReplace ein