이종회 님이 쓰신 글 :
: 프로그램에서 폼을 동적으로 하나 생성하여 메세지를 주고 받다가 폼을 닫고 또 다른 폼을 동적으로 생성하면 이전의 폼 객체와 통신을 하네요..
: TForm2.N111Click(Sender: TObject);
: var
: chat : chat_f;
: begin
: chat := Tchat_f.Create(self);
: chat.show;
: ........중략......
: 해서 폼을 하나 생성하고 통신을 하면 잘되는데, 이 폼을 닫고 다시 폼을 생성하면 통신이 안되요..
: 아무런 에러도 생기지 않고 두 번째 생성한 폼들은 서로 통신이 안되요..
: 아마도 이전에 열린 폼과 통신을 하는 모양인데..
: formclose이벤트에서 해당 객체에 free , nil값 모두 넣어 봤는데 안되네요
: 고수님들의 많은 조언 따끔한 충고 부탁드립니다.
:
안녕하세요..홍성진 입니다.
Tchat_f폼의 OnClose에 다음의 코드를 추가해 보세요
Action := caFree;
폼 종료시 메모리에서 삭제됩니다.
그럼..
|