Function TTemp.ABC : TABCObject Var PABC : ^TABCObject Begin PABC := List.Items[0]; <--??我想問怎樣可以return回一個object呢? End; 我想做到別人call TTemp時可以這樣.. TABCObject(varTemp.ABC).Print; 透過varTemp.ABC去return一個object,然後再call TABCObject的print...

In Delphi, an object is a pointer so no need to use an extra ^.

Function TTemp.ABC : TABCObject
Begin
  Result := TABCObject(List.Items[0]);
End;

http://pywong.hk.st http://www.lazybones.ca