小编tom*_*azy的帖子

有没有办法知道我目前所处方法的名称？

以便:

procedure TMyObject.SomeMethod();
begin
  Writeln('my name is: ' + <hocus pocus>); 
end;

会产生这个输出:

my name is: SomeMethod