result返回widechar该如何做？

Question

function TSafe.GetName(addr:WORD ):WideChar;
begin
  result:=nil;
  if(addr<>0) then
  begin
    case getid(addr) of
        1:
            result := '张三';
        2:
            result := '李四';
        3:
            result := '王二';
        4:
            result := '赵五';
        ……
    end;
  end;
end;要返回widechar该如何做呢？
最好能给出例子能达到这个效果的

Answer 1

"张三"已经不是 widechar 了，是 widestring 了

Answer 2

是啊，WideChar只能是单个宽字符

Answer 3

我只是想根据id返回一个name上面编译不通过出错的我想返回的最好是宽字符，该怎么做？

Answer 4

function GetName(addr:WORD ):WideString;