Mostrar o endereço que esta sendo visitado na internet

Delphi

05/07/2003

Como posso mostrar o endereço que está sendo visitado na internet.
Assim quero que quando eu clique na minha aplicação, ela mostre o endereço que está sendo visitado na internet?


Mineiro

Mineiro

Curtidas 0

Respostas

Cruz

Cruz

05/07/2003

Visite: [url=http://www.ictec.kit.net]IC Tec Informática[/url]

Veja se é isto que vc quer!
Inclua a unit [b:3bae59c18a]DDEMan[/b:3bae59c18a] na clausula Uses do form.

escreva o código abaixo:
procedure TForm1.Button1Click(Sender: TObject);
var
   DDE:TDDEClientConv;
begin
 DDE:=TDDEClientConv.Create(self);
 if DDE.SetLink(
   ´IExplore´,
   ´WWW_GetWindowInfo´) then
 begin
   Memo1.Lines.Add(´´);
   Memo1.Lines.Add
   (DDE.RequestData(´0xFFFFFFFF,sURL,0´));
   DDE.Free;
 end;
end;



GOSTEI 0
POSTAR