怎样去掉字符串后的#0

[kingti]

strout:=stringofchar(#0,size);
integer(ptr) := integer(ptr)+ Offset;
CopyMemory(@strOut[1], ptr, Size);

得出strOut的值为'305'#0 或者值为 'abc'#0

请问我怎么样去掉后面的 #0
谢谢。

[hongqi162]

delSpace('#0')

function delSpace(s:string):string;
var i:integer;
begin
result:='';
for i:=1 to length(s) do
begin
if s[i] <> ' ' then
result:=result+s[i];
end;
end;

[scfanxzq]

#0不是string的结束符吗？这也能结束？
或者你可以定义一个比string长度小的char型数组，把这个String拷贝过去？

[kingti]

谢谢大家，问题解决了。