Скачать: CL | DM;

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

← →
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 ;)

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

---

← →
Lord Warlock ©   (2002-08-01 14:29) [3]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c