PDA

Ver Versão Completa : Pegar URL Atual



ov3rr1d3
18/09/2009, 10:06
como faço para pegar url atual no brownser CHROME.
estou usando a seguinte...

function GetURL(Service: string): String;
var
ClDDE: TDDEClientConv;
temp:PChar;
begin
Result := '';
//create a new DDE Client object
ClDDE:= TDDEClientConv.Create( nil );
with ClDDE do
begin
SetLink(Service,'[Only registered and activated users can see links]');
temp := RequestData('0xFFFFFFFF');
Result := StrPas(temp);
StrDispose(temp);
CloseLink;
end;
ClDDE.Free;
end;


Usando
label1.caption := GetURL(IEXPLORER);
label2 := GetURL(FireFox);

Mais nao pega do CHROME. laguem sabe como faço para pegar. :(
Grato.

Itachi-kun
18/09/2009, 08:18
Vc ja postou essa duvida no seu outro topico..
se alguem souber a solução tenho certeza que irao te ajudar mas nao adianta ficar criando varios posts com a mesma duvida

Katsuke
18/09/2009, 08:35
Faça das palavras do Itachi-kun minhas palavras.

Tópico fechado.