Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Про WebBrowser [D7, WinXP]


Ivolg ©   (2007-08-11 16:24:00) 

Как в этом компоненте отключить стандартное меню браузера, и игрнорировать сообщения от кнопок клавы. Т.е мне нужно чтобы WebBrowser просто показывал содержимое html файла. Спасибо !


Ivolg   (2007-08-12 14:07:00) [1]

WASM   (12.08.07 08:47) [7]

Большое спасибо ! Этот вариант мне подошел )


WASM   (2007-08-12 08:47:00) [2]

На форму кидаете TApplicationEvents

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
 var Handled: Boolean);
begin
 if (Msg.Message = WM_RBUTTONUP) then
 begin
 //PopupMenu
   if IsChild(WB.Handle, Msg.hwnd) then
   begin
     PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y + 2);
     Handled := True;
   end;
 end;
//Клавиатура
 if (GetKeyState(VK_CONTROL) < 0) and (Msg.Message = WM_KEYDOWN) and
   (Msg.wParam = Ord('N')) then
 begin
   Handled := True;
 end;
end;


Wood   (2007-08-12 06:28:00) [3]

http://delphiworld.narod.ru/_internet_.html
> Ivolg ©   (11.08.07 19:03) [5]

Большинство ответов на вопросы можно взглянуть здесь
http://delphiworld.narod.ru/_internet_.html


Ivolg   (2007-08-11 19:03:00) [4]

Alarm ©   (11.08.07 17:20) [3]

Проблема не в открытии html файла, а в том чтобы непоказывать стандартное контекстное меню ИЕ !

Anatoly Podgoretsky ©   (11.08.07 17:26) [4]

Я в курсе :)


Anatoly Podgoretsky   (2007-08-11 17:26:00) [5]

> Ivolg  (11.08.2007 16:53:02)  [2]

WebBrowser позволяет сделать все, что и ИЕ, поскольку пользуются одними и теми же библиотеками.


Alarm   (2007-08-11 17:20:00) [6]

>Ivolg ©   (11.08.07 16:24)
uses shdocvw;
....

 wb := TWebBrowser.Create(Form1);
 TWinControl(wb).Name := 'MyWebBrowser';
 TWinControl(wb).Parent := Form1;
 wb.Align := alClient;
 wb.Navigate('index.html');


Ivolg   (2007-08-11 16:53:00) [7]

Наверно не так выразился)) Мне необходимо показывать html станицу, но чтобы при это можно было только смотреть. Чтобы пользователь не смог открыть стандартное меню ИЕ и не управлял им с клавиатуры. Может есть другие компоненты ля этой задичи ?


Anatoly Podgoretsky   (2007-08-11 16:42:00) [8]

> Ivolg  (11.08.2007 16:24:00)  [0]

Для показа содержимого более подходит блокнот, сам ИЕ так поступает.


Наверх

Титульная страница Поиск, карта сайта Написать письмо