Delphi里去掉字符串中空格的函数

 Trim()去掉字符串左右两边的空格和控制符，它的使用语法如下：

　　　function Trim(const S: string): string;

　　TrimLeft()用于去除字符串左边的空格，它的使用方法如下：

　　　function TrimLeft(const S: string): string;

　　TrimRight()用于去除字符串右边的空格，它的使用方法如下：

　　　function TrimRight(const S: string): string;

　　如果要去除字符串中间的空格就需要自己写程序来实现了，下面提供了一种方法，其主要思路是利用Pos()函数得到空格所在整个字符串中的位置，然后以此位置为界把整个字符串分别存到两个变量中，然后Trim掉有空格的那一部分，在把两个字符串合并，然后重复上述过程，直到Pos()函数返回0也就是没有找到空格为止。