프레임을 메인폼에서 불러서 사용중입니다.
프레임 안에는 TDBEdit를 놓고 ExitEvent를 걸어 놓았습니다.
메인폼에 올려놓은 프레임의 DBEdit에 한번더 ExitEvent를 걸었습니다.
근데 실행을 하면 메인폼에 걸어 놓은 ExitEvent코드만 실행되고 프레임에 걸어놓은 이벤트는 실행이 안되네요.
그래서 메인폼에 작성한 이벤트 처리는 삭제하고 실행하면 프레임의 이벤트 처리는 먹힙니다.
결론은 메인폼의 이벤트에 코드를 넣으면 inherited를 통한 프레임의 코드가 실행되지 않는 다는 겁니다.
왜 그런가요? 전에 Delphi7에선 잘 됐거던요...
메인폼의 ExitEvent 코드는 아래와 같습니다.
procedure TFrom1.F_DBDEditExit(Sender: TObject);
begin
inherited;
showmessage('test');
end;
고수님들의 가르침 부탁드립니다.
|