Dialogs

[Home][Support][TEmbeddedWB][Dialogs]

Dialogs

How to invoke different Dialogs in TEmbeddedWB:

Find Dialog: TEmbeddedWB.ShowFindDialog

Internet Options Dialog: EmbeddedWB.ShowInternetOptions

Procedure Open: (This procedure does not work in IE5)

Page Setup Dialog: EmbeddedWB.PageSetup(UsePrintOptions: Boolean)

Print Dialog: EmbeddedWB.Print

SaveAs Dialog: EmbeddedWB.SaveDialog

Page Properties Dialog: EmbeddedWB.ShowPageProperties

Tips & Tricks

1. Change Caption and Icon in Webbrowser's default Dialog-boxes

You can change the content of the caption-bar in TWebbrowsers built-in dialog-boxes. The following sample shows how to replace "Microsoft Internet Explorer" or "Internet Explorer" with the title and icon defined for your project:

Add to private section in your main form:

procedure WMActivate(var Msg: TWMActivate); message WM_ACTIVATE;

procedure TForm1.WMActivate(var Msg: TWMActivate);
var
S: String;
wnd: HWND;
I: Integer;
begin
If Msg.Active=0 then
begin
  wnd := Msg.ActiveWindow;
  SendMessage(wnd, WM_SETICON, ICON_SMALL, Application.Icon.Handle);
    I := GetWindowTextLength(wnd);
    SetLength(S, I + 1);
    GetWindowText(Wnd, PChar(S), I + 1);
    S := StringReplace(S, 'Microsoft ', '', []);
    S := StringReplace(S, 'Internet Explorer', Application.Title, []);
    SetWindowText(Wnd, Pchar(S));
end;
end;

2. Disable built-in Dialog-boxes.

It is not always a good idea to use Silent-property to prevent 'Internet Explorer Script Error'-dialogs and other standard messageboxes from showing up. Instead you can use the following solution. To disable all 'Internet Explorer' messageboxes:

Add to private section in your main form:

procedure WMActivate(var Msg: TWMActivate); message WM_ACTIVATE;

procedure TForm1.WMActivate(var Msg: TWMActivate);
var
S: String;
wnd: HWND;
I: Integer;
begin
if Msg.Active = 0 then
begin
wnd := Msg.ActiveWindow;
   I := GetWindowTextLength(wnd);
   SetLength(S, I + 1);
   GetWindowText(Wnd, PChar(S), I + 1);
   If Pos('Internet Explorer', S) > 0 then Sendmessage(wnd,WM_CLOSE,0,0);
end;
end;

3. Keep Contextmenu but disable "View Source"

You do not need to remove the right-click context-menu if you only want to disable "View Source".

Add the following key to the registry:

HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\View Source Editor\Editor Name

Set Value of 'Editor Name' to an exe-file, that does nothing but shows a messagebox: "View Source is not available".

[Home][News][Products][Downloads][Support][Forum][Credits]

Created by
Per Lindsø Larsen

bsalsa@bsalsa.no-ip.info