Call Internet Explorer

Windows with Delphi
Windows API (94)
Windows Filesystem (41)
Windows Forms (69)
Windows Graphics (38)

See also:

Call Internet Explorer

This article has not been rated yet. After reading, feel free to leave comments and rate it.

Now that Internet Explorer is a standard part of Windows NT 4.0 and probably of future versions of Windows [95] , you may find it useful to add a hot key to your program which will take the user to your home page.

Use it like this: OpenInternetExplorer('preview.org');

uses
   Windows, OLEAuto;
 
 procedure OpenInternetExplorer(sURL : string);
 const
   csOLEObjName = 'InternetExplorer.Application';
 var
   IE        : Variant;
   WinHandle : HWnd;
 begin
   if VarIsEmpty(IE) then
   begin
     IE := CreateOleObject(csOLEObjName);
     IE.Visible := true;
     IE.Navigate(sURL);
   end
   else
   begin
     WinHandle := FindWindow('IEFrame', nil);
     if WinHandle <> 0 then
     begin
       IE.Navigate(sURL);
       SetForegroundWindow(WinHandle);
     end
     else
     begin
       // handle error ...
     end;
   end;
 end;

Send a message to
Subject

Comments:

NEW: Optional: Register Login Email address (not necessary): Rate as	Hide my email when showing my comment. Please notify me once a day about new comments on this topic. Please provide a valid email address if you select this option, or post under a registered account.

	Show city and country Show country only Hide my location
You can mark text as 'quoted' by putting [quote] .. [/quote] around it.
Please type in the code:
Please do not post inappropriate pictures. Inappropriate pictures include pictures of minors and nudity. The owner of this web site reserves the right to delete such material. Add a picture:


	Search: