А это случаем не конвертация Integer в String?
Проверь примерно такой фокус:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
I : ^Integer;
P : PChar;
begin
Randomize;
GetMem(I,SizeOf(Integer));
I^ := Random(2147483647);
P := Pointer(I);
ShowMessage('String(Integer(' + IntToStr(I^) + ') = ' + StrPas(P));
end;