정진후 님이 쓰신 글 :
: 죄송합니다. 제 질문이 조금 모호했던가 보군요...
: 다시 한 번 정리를 하자면,
: 어떠한 함수(글로벌 이겠지요)는 타이머에 의해 지속적으로 호출되어
: 어떠한 조건을 감시합니다. 그 함수의 입장에서는 중요한 것은
: 현재 유저가 어떤 버튼을 눌러(혹은 자동으로) 어떠한 서브 폼이
: 떠있는 것이 아니라 지금의 감시하고 있는 조건이 충족되는지 아닌지
: 입니다.
: 만일 그 조건이 충족되어 "아! 유저에게 이 사실을 알려야 겠구나"라는
: 경우에 하나의 폼을 생성하여 어쩌고 저쩌고 이야기 하는 것이
: 손쉬운 방법이라 생각됩니다만 제가 하려고 하는 것은,
: 현재 메인 폼에 대한 서브 폼1이 떠 있을 경우는 서브 폼1에 정해진
: 정보를 출력하고 서브 폼2가 떠 있을 경우에는 서브 폼2에 출력,
: 서브 폼n이면 서브 폼n에 출력...
: 뭐 이러한 작업을 하고 싶습니다만, 어떻게 구현해야 하는 지
: 잘 모르겠군요, 그래서 제 나름대로 낑낑메다 찾은 방법이
: 지난 번 질문했던 API함수로 윈도의 핸들을 찾아와 어쩌고
: 저쩌고 였습니다.
:
: 결론을 말씀드리면 API, VCL상관 없이 호출되는 함수의 입장에서
: 현재 모달 모드로 떠있는 폼을 찾아서 그 폼의 프로퍼티 및 소속
: 컴퍼넌트에 억세스하는 방법을 알고 싶습니다.
:
: 이번 질문도 모호했나여? 임프님...



임펠리테리입니다.

그런 뜻이었군요... ^^
현재 실행중인 어플리케이션 자신의 활성폼을 찾으려면 TScreen::ActiveForm 프로퍼티를 읽으면
됩니다. 그러면 TForm 형의 포인터가 리턴되죠.
다시 그 안에서 활성 컨트롤을 찾으려면 TForm::ActiveControl 프로퍼티를 이용하면 되겠죠?

그럼 참고하시길...