DelphiFAQ Home Search:
General :: Windows :: Programming :: Windows with Delphi :: Windows API
Windows programming with Delphi

Articles:

This list is sorted by recent document popularity (not total page views).
New documents will first appear at the bottom.

Only the 40 most recently viewed articles are shown.
You can see the full list here.

Featured Article

Call Internet Explorer

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;

Generated 12:03:05 on Oct 17, 2017