Как узнать текущий URL и заголовок окна Opera или Netscape?

Delphi FAQ >> Интернет

Данная функция, написанная на языке программирования Delphi, возвращает URL активной страницы, открытой в web-браузере Opera или Netscape, а также заголовок окна браузера.

Uses DdeMan;

function GetOperaURLandTitle: String;
var
  DDE: TDdeClientConv;
begin
  DDE := TDdeClientConv.Create(Application);
  if DDE.SetLink( 'Netscape', 'WWW_GetWindowInfo' ) then
    result := DDE.RequestData( '0xFFFFFFFF, sURL, sTitle' )
  else
    result := '';
  DDE.Free;
end;


На просторах СНГ качается олько бесплатная музыка, за музыку мы пока не готовы платить.