Вниз
Скачать: CL | DM;

Контектное меню IE   Найти похожие ветки 

 
uns   (2004-01-01 22:36) [0]

Как добавить свой пункт в контекстное меню IE как это делает FlashGet? Т.е. шоб можна было кликнуть правой кнопкой по ссылке,
а в менюшке свой пункт?


 
~GaMeRd~ ©   (2004-01-02 00:11) [1]

public
procedure WMMouseActivate(var Msg: TMessage); message WM_MOUSEACTIVATE;

.......................

procedure TForm1.WMMouseActivate(var Msg: TMessage);
begin
try

inherited;
//Анализируем, какая кнопка мыши нажата
if Msg.LParamHi = 516 then // если правая
// показываем свое меню
PopupMenu1.Popup(Mouse.CursorPos.x, Mouse.CursorPos.y);
Msg.Result := 0;

except

end;


end;

Код не мой, но работает


 
Rouse_ ©   (2004-01-02 13:50) [2]

C:\Program Files\Borland\Delphi6\Demos\ActiveX\ShellExt\contmenu.dpr

Желаю успехов



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
1-25758
Pahan_
2004-02-26 16:16
2004.03.09
Drag n Drop в наследнике от TTreeView


1-25770
Janbolat
2004-02-26 11:19
2004.03.09
Installshieldexpress для Delphi 6


14-25894
ИМХО
2004-02-16 03:23
2004.03.09
В чем причина феноменального успеха Microsoft Corp.?


14-25885
Andryk
2004-02-12 11:45
2004.03.09
Давайте еще раз пообсуждаем наш закон об ОСАГО


7-25956
Rentgen
2003-12-20 22:28
2004.03.09
PreView?




   Наверх