procedure RealizeLength(var s:string);
begin
setlength(s,strlen(pchar(s))); //这段里里面的s,strlen两个是什么意思的
end;
var
s:string;
begin
setlength(s.256);
GetwindowsDirectory(p(s),256);
Realizelrngth(s);
end;
请大家给个详细的注释,
...全文
704打赏收藏
procedure RealizeLength
procedure RealizeLength(var s:string); begin setlength(s,strlen(pchar(s))); //这段里里面的s,strlen两个是什么意思的 end; var s:string; begin setlength(s.256); GetwindowsDirectory(p(s),256); Realizelrngth(s); end; 请大家给个详细的注释,