Showstr(TAObj.Create)中创建的TAObj对象生死的有关问题

Showstr(TAObj.Create)中创建的TAObj对象生死的问题
最近看刘艺老师的书《delphi面向对象编程思想》，里面有一段程序是类似这样的：
TFrom1.Showstr(AObj:TObj);
begin
  AObj.ShowName;
end;
//.......下面是按钮事件
TForm1.button1click(Sender:TObject);
begin
  Showstr(TObj.Create);
end;
//.......下面是TObj.ShowName
TObj.ShowName;
beign
  showmessage('Tom');
end;

在上面的按钮事件中，Showstr(TObj.Create)里TObj.Create创建了一个对象实例，但刘艺老师并没有显示地调用Free或destroy函数销毁对象，让我不得其解，故在此请教：刘艺老师为什么不销毁按上面Showstr(TObj.Create)方式创建的对象实例？应该怎么理解这种创建方式对象的生死？
注：TObj=class(TObject);
------解决方案--------------------
俺对这些代码都没啥印象了。。。
书中哪一页的，得看看书里的上下文