양은주 wrote:

> 안녕하세요??

> 자주 질문을 올리는것 같아 죄송하군요...

>

> 그럼에도 불구하고 또 다시 질문을 올립니다.

>

> 만약, 어떠한 폼이 ShowMessage를 띄우는 버튼을 가진다고 합시다.

>

> 제가 제작하고자 하는 에디트 컴포넌트는 에디트가 클릭이 되면, 위의 기능을 가진 폼을 띄우고 싶습니다.

>

> 그냥, 폼이 존재한다고 생각하고, Application.Components[i]를 이용해서

> 어째어째 얼렁뚱땅 목표 달성하는 것은 하였는데,

> 그 에디터에 영구히 그 기능을 가진 폼을 포함한 에디터를 만들수 있는 방법은

> 없는지요...

>

> 꼭좀 친절하신 답변 기다리겠습니다.





안녕하세요~ 구창민입니다.



자주 답변을 못올려서 죄송합니다...



그럼에도 불구하고 답변을 올립니다... ^^;



Edit의 OnClick 이벤트 핸들러만 overried 하시면 되겠네요..



예를 들면 몇줄 안됩니다..



type

TMsgEdit = class(TEdit)

private

procedure Click; override;

end;

....

....

procedure TMsgEdit.Click;

begin

inherited;

Application.MessageBox('클릭했냐~', '확인', MB_OK+MB_ICONINFORMATION);

end;



음... 이런 형태면 되겠네요..



그럼~ 즐거운 프로그래밍 되시길~