델파이의 모달 폼에서 Release 대신 Free를 사용하는 것이 안전합니까?

Question

Delphi 온라인 도움말에 따르면 메모리에서 양식을 제거하려면 릴리스를 사용해야합니다. 그러나 모달 형식의 많은 예제에서이 구조를 보았습니다.

MyForm := TMyForm.Create(nil); 
try 
    MyForm.ShowModal; 
finally 
    MyForm.Free; 
end; 

모달 형식을 안전하게 삭제하는 안전한 방법은 없습니까? ShowModal 소스에서 알 수 있듯이, Application.HandleMessage는 ModalResult가 0이 될 때까지 호출됩니다. Free가 보류중인 Windows 메시지를 방해 할 수없는 이유는 무엇입니까?

Answer 1

예, ShowModal 전화 후 Free을 사용해도 안전합니다.

Release을 사용해야하는 경우는 이벤트 처리기 (예 : OnClick)의 중간에있는 경우로 이벤트 이후 추가 처리시 양식에 액세스해야하는 경우입니다. 이 경우 Release을 호출하면 이벤트 핸들러가 완료되고 컨트롤이 메시지 펌프 (ProcessMessages/Application.Run)로 반환 될 때까지 이벤트를 해제하지 않는 메시지 CM_RELEASE이 대신 게시됩니다. ShowModal은 이벤트 처리기가 완료되고 제어를 통해 스택을 백업 할 때까지 반환되지 않으므로 나중에 Free을 호출하면 실제로 CM_RELEASE 메시지가 처리되는 동일한 위치가됩니다.

Answer 2

물론 FreeAndNil 루틴을 사용할 수도 있습니다. FreeAndNil 루틴은 객체가 이미 nil이 아닌 경우에만 해제하고 자유 후에 nil로 설정합니다. 이미 해제 된 개체에서 무료로 직접 전화하면 액세스 위반이 발생합니다.

MyForm := TMyForm.Create(nil); 
try 
    MyForm.ShowModal; 
finally 
    FreeAndNil(MyForm); 
end; 

Answer 3

에 달려 있습니다. Free은 Release이 수행하는 이벤트 처리기를 호출하지 않으며 양식에 게시되고 대기중인 메시지는 처리되지 않습니다. 대부분의 경우, Free (또는 FreeAndNil)을 호출하는 대부분의 경우에 정상적으로 작동하지만 겉으로보기에 임의의 이유로 인해 매우 이상한 동작이 발생할 수 있습니다.

난으로 onClose 이벤트에서이 같은 caFree에 액션, 설정 좋을 것 대안 :

이

procedure FormClose(Sender : TObject; Action : TCloseAction) 
begin 
    Action := caFree; 
end; 

당신은 다음과 같은 코드를 작성할 수 있습니다

TMyForm.Create(nil).ShowModal; 

그리고 돈을 그것이 완료되면 자유로울 것이기 때문에 특별히 형식을 자유롭게 할 필요가 없습니다.