DLL函数返回PChar类型字符串, 在调用这个DLL函数显示结果后面会多出一个#14这个字符, 为什么?

Question

DLL:
  procedure GetStr: PChar; stdcall;
  begin
    Result := PChar('True');
  end;调用DLL的主程序:
function  GetStr: PChar; stdcall; external 'Common.dll';procedure TFrmMain.Button1Click(Sender: TObject);
begin
  Button1.Caption := GetStr;  //这里会返回True
end;
为什么True后面会多个, 用UE查看ASCII是#14, why?

Answer 1

Caption是string类型的，以＃0结束。你调用的的返回的pchar类型。这是没有指定长度的。要想准确的返回。要把length（返回字符串）＋1手动赋值一个#0。

Answer 2

Button1.Caption := StrPas(GetStr);

Answer 3

GetMem(result, Length(Decode_Str)+1); //result为返回值
  ZeroMemory(result, Length(Decode_Str)+1);
  StrPCopy(Result, Decode_Str);