Combobox и TstringList

[Аватар]

Добавляется существующий объект или вообще не объект, а integer приведенный к типу TObject. Combobox уничтожит только внутренний список

[Serge_Bliznykov]

Сообщение от Аватар

Добавляется существующий объект или вообще не объект, а integer приведенный к типу TObject. Combobox уничтожит только внутренний список

поэтому, если Вы создавали объекты, перед тем, как добавить их в список, то и уничтожать их нужно Вам, чтобы избежать утечек памяти.

[Shouldercannon]

procedure TFormMain.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to 4 do
  begin
    ComboBox1.Items.AddObject('Test' + IntToStr(I), TObject(I));
  end;
end;

procedure TFormMain.FormDestroy(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to ComboBox1.Items.Count - 1 do
  begin
    ComboBox1.Items.Objects[I].Free;
  end;
end;

При высвобождении объектов на I = 1 нарываюсь на access violation.

[Аватар]

Чего решил, что TObject(I) объект, требующий освобождения памяти?

[Shouldercannon]

Сообщение от Аватар

Чего решил, что TObject(I) объект, требующий освобождения памяти?

Значит ошибся. Не требует