![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Освободить память после function MyFunction:TMemoryStream; [D7, 2000]
Shaman_ © (2006-08-16 16:20:00)Функция должна вовзращать результат в виде класса:
function MyFunction:TMemoryStream;
begin
Result := TMemoryStream.Create;
...
end;
Торможу, не могу освободить память, на создание экземпляра класса, после вызова функции.
Подскажите как это правильно делать?
Сергей М. (2006-08-16 16:22:00) [21]Stream := MyFunction;
try
...
finally
Stream.Free;
end;
Desdechado (2006-08-16 16:21:00) [22]x:=MyFunction;
x.Free;