constructor TA.Create; begin inherited; FB := TB.Create; DoSomethingThatCanRaise; FC := TC.Create; end; destructor TA.Destroy; begin FreeAndNil(FB); FC.CallSomeMethod; FreeAndNil(FC); inherited; end;
Ведь если DoSomethingThatCanRaise - обломится. То вызовется деструктор. Это гарантирует компилятор. А FC - не СОЗДАН. Ну и на FC.CallSomeMethod - огребём AV.
Комментариев нет:
Отправить комментарий