Solved

Internet Explorer

Posted on 2004-03-29
4
309 Views
Last Modified: 2012-05-04
Hi guys...

I have litle project wich need to run Internet Explorer with url, wich i show in my project.

So some litle exsample:

editbox1.text:='www.http://www.experts-exchange.com'; //this is URL

button1click
begin
programm runs "Internet explorer" with URL what i wrote in that edit box

so program runs explorer with URL www.http://www.experts-exchange.com
end;

Is it posible to do?
0
Comment
Question by:Kristao
  • 2
4 Comments
 

Accepted Solution

by:
glaZer_software earned 125 total points
ID: 10707772
yes it is possible.
try this:

procedure Execute(url: String);
var s:String;
begin
  s:='';
  If Pos('http://',lowercase(Url))<=0 then s:='http://';
  ShellExecute(Self.WindowHandle, 'open', PChar(s+Url), nil, nil, SW_SHOWNORMAL);
end;


this will launch the default internet browser with your URL so it it more genereal
in your case it might be internet explorer
0
 

Expert Comment

by:glaZer_software
ID: 10707795
one more thing before useing
shellexecute you must put
    ShellApi
in your uses clause, i think
0
 
LVL 4

Expert Comment

by:BedouinDN
ID: 10708709
Or you could use:

uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
IE: Variant;
begin
IE:=CreateOleObject('internetexplorer.application');
IE.Visible:=True;
IE.navigate('http://www.experts-exchange.com');
end;

You can also access a lot of the Internet Explorer browsers content using the com object.

:-)
0
 
LVL 1

Author Comment

by:Kristao
ID: 10711384
thx glaZer_software
0

Featured Post

ScreenConnect 6.0 Free Trial

At ScreenConnect, partner feedback doesn't fall on deaf ears. We collected partner suggestions off of their virtual wish list and transformed them into one game-changing release: ScreenConnect 6.0. Explore all of the extras and enhancements for yourself!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
This Micro Tutorial demonstrates using Microsoft Excel pivot tables, how to reverse engineer competitors' marketing strategies through backlinks.
Microsoft Active Directory, the widely used IT infrastructure, is known for its high risk of credential theft. The best way to test your Active Directory’s vulnerabilities to pass-the-ticket, pass-the-hash, privilege escalation, and malware attacks …

770 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question