Поиск активного окна

[Arigato]

Есть некоторое приложение (конкретно: браузер Опера).
Может быть запущено сразу несколько окон. Как можно найти активное в данный момент окно браузера?

[Stilet]

GetActiveWindow ?

[Arigato]

Вопрос решился использованием функции GetForegroundWindow
GetActiveWindow как-то не так работает.

[Arigato]

Продолжу тему. И так, если у нас открыта Опера, я получаю hwnd этого окна. Теперь мне надо узнать, какой адрес находится в адресной строке.
Но если я прохожу по всем дочерним окнам, а в Опере открыто несколько вкладок, то я получаю несколько адресных строк с разными адресами. Как бы узнать, какая из вкладок является активной?

[Arigato]

Немного переформулирую вопрос.
Мне нужно получить URL, набранный в адресной строке браузера Опера. Как такое сделать? Уже второй день бьюсь над этим...

[Arigato]

Задача решена. Если кому потребуется, вот решение:

uses DdeMan;
function GetURL(Browser: string): string;
var
 Client_DDE: TDDEClientConv;
 temp: PChar;
begin
 Result := '';
 Client_DDE:= TDDEClientConv.Create( nil );
 with Client_DDE do
  begin
   SetLink(Browser, 'WWW_GetWindowInfo');
   temp := RequestData('0xFFFFFFFF');
   Result := StrPas(temp);
  // Return only the URL part
   Delete(Result, Pos(',', Result), Length(Result)-Pos(',', Result)+1);
   // Remove quotes
   Delete(Result, 1, 1);
   Delete(Result, Length(Result), 1);
   // ************
   StrDispose(temp);
   CloseLink;
  end;
 Client_DDE.Free;
end;
WriteLn (GetURL ('Opera'));