[fpc-pascal] Trim repeated whitespace from a string

[Felipe Monteiro de Carvalho]

On 5/26/06, Cox, Stuart TRAN:EX <Stuart.Cox at gov.bc.ca> wrote:
> The __CvtStr function used the _REM_LEAD_WHITE_STR +
> _REM_TRAIL_WHITE_STR

For this you can just use the Trim function.

> + _REDUCE_WHITE_STR

This looks easy to implement. You can just create your own function for this.

for i := 0 to Length(Str) do
begin
  If last character was a space and Str[i] is a space, take that character off.
end;

-- 
Felipe Monteiro de Carvalho