DELPHI 2011（XE）发现的问题

Question

COM+中:procedure GetUserName(var UserName: WideString); stdcall;
调用时var
  s: string;
  ss: WideString;
begin
  AppServer.GetUserName(s);  //返回值总是''(空串)
  AppServer.GetUserName(ss);  //返回正确的值
end;今天用2011写个小程序时发现的，害得我花费了不少的时间。:(暂时不敢将D7的程序升级到2011了----要改不少地方。希望大家注意一下。

Answer 1

好像7后的版本都是将string 改为 widestring了吧

Answer 2

这个该算正常现象吧。
不过编译器不提示错误，好象有警告吧。但警告也太多了，确实有点不人性化。
类似代码BCB2011会产生编译错误，而非警告。Delphi通过编译但运行期得不到预期值。