Fix a bug

-  Trim(str);
+  str := Trim(str);