TWebBrowserEx

[Igorek]

скачал я этот компонент, почему он такой убогий? после переадресации WebBrowserEx.url не меняется на новый, что делать?

[ruslan]

помню допиливал для себя.

см. вложение.

 

на DidFinishLoad делай

// вытягиваем урл из компонента WebBrowser
  {$ifdef mswindows}
    newURL:= (FWebBrowser.GetWeb as IWebBrowserEx).GetLocation;
  {$else}
    newURL:= FWebBrowser.GetWeb.URL;
  {$endif}

( конечно, можно все ето в геттеры\сеттеры завернуть, но времени не было)

везде не тестил. но под винду и ведро работает( я ловил редирект после авторизации в [прости господи] Вконтакте )

TWebBrowserEx.zip

[Igorek]

помню допиливал для себя.

см. вложение.

 

на DidFinishLoad делай

// вытягиваем урл из компонента WebBrowser
  {$ifdef mswindows}
    newURL:= (FWebBrowser.GetWeb as IWebBrowserEx).GetLocation;
  {$else}
    newURL:= FWebBrowser.GetWeb.URL;
  {$endif}

( конечно, можно все ето в геттеры\сеттеры завернуть, но времени не было)

везде не тестил. но под винду и ведро работает( я ловил редирект после авторизации в [прости господи] Вконтакте )

спасибо тебе, о Великий, иногда кажется, что я один пишу на обезьянке, 0 инфы. и я тоже епу свой мозг с ВК)

[ruslan]

да незачто ) все мы в одной большой "яме"  !)

а api у вк не сложное...

вот фейсбук... очень закрытое апи

[Igorek]

да незачто ) все мы в одной большой "яме"  !)

а api у вк не сложное...

вот фейсбук... очень закрытое апи

согласен, очень комфортное... 

с последним еще предстоит работа