Навеяно недавней веткой

← →
Дмитрий_Б (2005-08-17 14:24) [0]

Почему этот код:

procedure TForm1.Button1Click(Sender: TObject);
var c: TObject;
begin
c := TObject.Create;
c.Free;
c.Free;
end;

при первом клике не вызывает исключения, а при втором возникает AV ?

← →
Rouse_ © (2005-08-17 14:27) [1]

Потому что ты пытаешся вызвать метод разрушенного объекта :)

← →
Kot Andrei © (2005-08-17 14:49) [2]

мне тоже интересно! ведь при первом клике тоже повторно вызывается метод Free, и обходится без исключений...?

Дмитрий_Б (17.08.05 14:24)
Из за особенностей внутреней реализации данной версии Дельфи

Навеяно недавней веткой Найти похожие ветки