탐색기나 폼더안에서 화일이나 디렉토리를 선택하고

마우스 오른쪽을 누르면 팝업 메뉴가 나오는데..

여기다 제가 만든 프로그램을 추가하고 싶습니다..

어떻게 해야 할까요??.

예들들어 winzip을 설치하고 화일 선택후 마우스 오른쪽을 누르면

팝업 메뉴에 선택된 화일을 winzip으로 압축할수 있게

됩니다...

이런 기능은 어떻게 구현 하는 것인지요???.

한 wrote:

> 모두들 수고하시네요...

> 어려운 시기에 모든일 잘되시기를 먼저 기원합니다. 저도 잘되고요...후후

> 어찌 설명해야 될지 모르겠지만,....ㅠㅠ

>

> 두개의 메모가 있는데 한쪽 메모의 스크롤버턴을 누르면

>

> 다른쪽의 스크롤버턴을 누른거와 같은 효과를 낼려고 합니다.

>

> 그러니까 어느 한쪽을 클릭하면 두개의 메모가 동시에 작동하는거죠....ㅠㅠ

>

> 어찌해야될지 모르겠네요...ㅜㅜ

> | |

> 많은 조언 부탁드립니다.

>

> 수고하세요.



아래와 같이 코딩하세요.



var

Form1: TForm1;

OldListWinProc: TWndMethod;



implementation



{$R *.DFM}



procedure TForm1.NewListWinProc(var Message: TMessage);

begin

OldListWinProc(Message);

with Message do

Case Msg of

WM_VSCROLL:

SendMessage(Memo2.Handle,WM_VSCROLL,wParam,lParam);

WM_HSCROLL:

SendMessage(Memo2.Handle,WM_HSCROLL,wParam,lParam);

end;

end;



procedure TForm1.FormCreate(Sender: TObject);

begin

OldListWinProc:=Memo1.WindowProc;

Memo1.WindowProc:=NewListWinProc;

end;



procedure TForm1.FormDestroy(Sender: TObject);

begin

Memo1.WindowProc := OldListWinProc;

end;



도움이 되셨지요.. 위와 같은 방법으로 하면

어떤 컨트롤의 메세지를 전부 가로챌 수 있어요.....



그럼 감사의 메일을 기다립니다...^^

말슴하신 기능을 마이크로소프트에서는 Shell Extensions이라고 합니다.

레지스트리를 건드리는 방법과 OLE를 이용해서 Context Menu Handler를

작성하는 방법이 있습니다.

자세한 사항은 마이크로소프트 MSDN 홈페이지에서 아래 문장으로 검색하면

보실 수 있을 겁니다.



"Extending Context Menus"

"Shell Extension Handlers"



그럼..





이현신 께서 말씀하시기를...

> 탐색기나 폼더안에서 화일이나 디렉토리를 선택하고

> 마우스 오른쪽을 누르면 팝업 메뉴가 나오는데..

> 여기다 제가 만든 프로그램을 추가하고 싶습니다..

> 어떻게 해야 할까요??.

> 예들들어 winzip을 설치하고 화일 선택후 마우스 오른쪽을 누르면

> 팝업 메뉴에 선택된 화일을 winzip으로 압축할수 있게

> 됩니다...

> 이런 기능은 어떻게 구현 하는 것인지요???.

>