Освобождение памяти

[Heylal]

Обязательно ли освобождать память? Ведь после закрытии формы она и так освободится.
И чем отличается Free от Destroy?

Добавлено через 10 минут
У меня в цикле s:=TStringList.Create; без освобождения памяти это получается происходит нагрузка?

[Dinmaite]

Память освобождать нужно в зависимости от того нужно ли вам осовобождать память.
Если Вы в цикле создаете множество объектов, которые вам вне цикла не нужны - память, выделенную под них, необходимо освобождать, иначе загадите оперативку (или файл подкачки) мусором.

Если Вас интерисуют различия конкретно для TStringList

Free ("безопасное" уничтожение, перед уничтожением проверяется существование объекта):

procedure TObject.Free;
begin
  if Self <> nil then
    Destroy;
end;

Destroy:

destructor TStringList.Destroy;
begin
  FOnChange := nil;
  FOnChanging := nil;
  inherited Destroy;
  if FCount <> 0 then Finalize(FList^[0], FCount);
  FCount := 0;
  SetCapacity(0);
end;

[VeTaL_UA]

Для TStringList лучше использовать Free:

s.Free

[Dinmaite]

Если программа работает по 1 час, и этот цикл выполняется с периодом в 1 секунду, и размер вашего стринглиста 1 метр, то за этот самый час вы займете 3600 метров памяти.