[Помидоркин]

Добавил к TStringList функцию

Код:

 type
  TMyStrList=class(TStringList)
  public
   function AllNames:TStrings;
 end;
------------------------------
implementation

function TMyStrList.AllNames:TStrings;
var i: Byte;
begin
 Result:= TStringList.Create;
 for i:=0 to Count-1 do Result.Append(Names[i]);
end;
------------------------------

теперь задался вопросом: что будет с результатом после вызова функции, в смысле TStringList я создал, а уничтожать его кто будет?