Проблемма с деструктором

← →
id_privin © (2002-08-01 12:30) [0]

Добрый всем день.

Такая странная проблемма.
есть класс

TContainer = class(TObject) value : variant end; далее в программе var C : TContainer; begin C := TContainer.Create(); C.Value := "OK"; C.Free; MessageDlg(C.Value, mtInformation, [mbOK], 0); end;

По идее в последней строке Exception. Но вместо этого я просто получаю в C.Value пустую строку т.е обект не удален из памяти.

Вопрос : как его оттуда удалить.

← →
Skier © (2002-08-01 12:34) [1]

>id_privin

> т.е обект не удален из памяти.

Удалён, но указатель не очищен.

← →
DiamondShark © (2002-08-01 14:19) [2]

Ага. Еще один баг Дельфи. До кучи с циклом for ;)

Вам тоже машинный код продемонстрировать?

В Д5 появилась функция FreeAndNil

Проблемма с деструктором Найти похожие ветки