팁이라고 말하기 머한 허접한 팁입니다.
후배가 걍 알려달라고해서 알려준건데 걍 혹시나 또 필요하신분 있을까봐 올립니다. ^^
(... 누군가의 팁업로드의 압박이 밀려온다... ㅋㅋ)

procedure TForm1.Button1Click(Sender: TObject);
var
  a : Integer;
  s : String;
begin
  s := Format('%p', [@a]);
  ShowMessage(s);
end;

이 게시물을...