발바닭
(류재욱)
|
|
System.pas에 포함되어 있는 TInterfacedObject는 RefCount를 관리하다가 0이 되는 순간 메모리에서 해제하는 코드가 포함되어 있습니다.
function TInterfacedObject._Release: Integer;
begin
Result := InterlockedDecrement(FRefCount);
if Result = 0 then
Destroy;
end;
이부분인데요. 즉, 시스템에서 사용이 끝난 Interface에 대해 _Release를 자동으로 호출해주고, 그 시점에서 메모리 해제가 일어 납니다.
좀더 위로 올라가면 function _IntfClear(var Dest: IInterface): Pointer; 함수에서 해주는거고..
2011-02-11 오전 10:16:27
|
|
