D2005, D2007: WideFormatBuf with %p

Hi,

i'm trying to use WideFormat with a pointer. My call to wideformat looks
like this:

var
   P: Pointer;
   S: WideString;
begin
   P := Pointer($BADF00D);
   S := WideFormat('%p', [P]);
end;

The problem is that the result contains garbage. I have tracked it down
to SysUtils.WideFormatBuf. There exists a label named @CvtPointer. I
think the JMP to CvtInt is wrong. The jump should go to CvtIntW or
CvtInteger.

Is my assumption correct and this is a bug?

Thanks, Soeren