(여기에서 설명하는 내용의 소스코드를 첨부했습니다.)
FreeAndNil에 관한 문제는 검색해 보면 여러 차례 논의가 된 적이 있음을 알 수 있습니다.
FreeAndNil 자체에는 사실 큰 문제는 없음에도 불구하고
Test1.Free;
Test1 := nil;
이렇게 하면 잘 되던 것이
FreeAndNil( Test1 );하면 문제가 된다는 것이 대표적인 경우입니다.
그런 문제를 제기한 대표적인 경우가 강좌 게시판에 있습니다.
http://www.delmadang.com/community/bbs_view.asp?bbsNo=3&bbsCat=0&st=S&keyword=FreeAndNil&indx=195996&keyword1=FreeAndNil&keyword2=&page=1저와 다른 분이 이 글에서 '
FreeAndNil은 안전하다'라고 주장을 했습니다만..
사실 저는 그동안 전혀 문제가 없었고
FreeAndNil의 소스를 봐도 문제가 없을 것으로 생각되어져서 '안전하다'라는 말을 자신 있게 했는데..
간간히 다른 사람들이 코딩한 것을 보면서 '코딩습관에 따라서 문제가 있을 수도 있다'라는 것을 깨달았었습니다.
이 사실을 까맣게 잊고 있었는데 조금 전에 메신저로 누군가가 그것을 물어보는 바람에 생각이 나서 또 까먹기 전에 적어 놓습니다.
시작.
다음과 같은 클래스가 있다고 칩시다.
type
TTest = class
public
procedure ShowMsg(const S: String); virtual;
destructor Destroy; override;
end;
implementation
var
Test1: TTest;
destructor TTest.Destroy;
begin
Test1.ShowMsg( 'Destroy' );
inherited;
end;
procedure TTest.ShowMsg(const S: String);
begin
ShowMessage( S );
end;
|
TTest라는 클래스가 있고..
Test1: TTest;와 같이 변수를 선언해서 사용하고 있습니다.
이 상태에서 다음과 같이 사용할 경우..
Test1 := TTest.Create;
try
Test1.ShowMsg( 'Button1Click' );
finally
Test1.Free;
Test1 := nil;
end; |
이 경우에는 전혀 문제가 없습니다. 그러나 다음과 같이
FreeAndNil을 사용하는 경우에는 문제가 생깁니다.
Test1 := TTest.Create;
try
Test1.ShowMsg( 'Button1Click' );
finally
FreeAndNil( Test1 );
end; |
이 문제의 원인은 소멸자
Destroy에서
Test1 변수를 사용하고 있다는 점입니다.
다음은
FreeAndNil의 소스입니다.
procedure FreeAndNil(var Obj);
var
Temp: TObject;
begin
Temp := TObject(Obj);
Pointer(Obj) := nil;
Temp.Free;
end; |
이 소스를 보면 알 수 있듯이 Free And Nil이 아니고 Nil And Free입니다.
그러므로
FreeAndNil( Test1 ); 을 하면 소멸자
Destroy가 실행되는 시점에서
Test1 변수는
nil로 세팅되어져 있고 그것을 액세스 했으므로 에러가 발생합니다.
물론 이렇게 소멸자에서 자신의 인스턴스 변수명을 직접 사용하는 경우는 많지 않겠지만 (이해는 안되지만..생각보다는 많더라는..ㅡㅡ; ) 소멸자에서 다른 클래스를
Free하고 그 다른 클래스에서 자신의 인스턴스를 사용하는 경우.. 즉, 한 바퀴 돌아서 결과적으로 소멸자에서 자신의 인스턴스를 사용하는 꼴이 되는 경우에는
FreeAndNil을 사용하면 에러가 납니다.
저는 어지간해서는 전역변수 사용은 최소화하는데 전역변수를 습관적으로 많이 사용하는 사람들이나 폼을 많이 사용하는 경우에 이런 일이 자주 생깁니다만 두 경우 모두 전역변수가 많다보니 이런 코딩이 만들어질 확률이 높아지는 것 같습니다.
개인적인 생각으로는 사실
FreeAndNil의 잘못이라기 보다는 그렇게 코딩하는 것이 더 좋지 않은 것 같습니다만.. 그 정도는 개인적인 취향으로 인정할 수 있을 것 같습니다. 그러므로
FreeAndNil을 사용하면서 문제가 된 경험이 있는 사람은 그냥 안쓰면 된다는 결론입니다. (
FreeAndNil도 나쁘네.. 왜 그렇게 맹글어가지고....)
끝.
### 운영진 ###
본 게시물의 첨부파일은 바이러스에 감염되어 삭제처리되었습니다.
해당 바이러스는 w32
FreeAndNil 사용시에 주의 할 점 한 가지
