ruslan

помню допиливал для себя.
см. вложение.
 
на DidFinishLoad делай
// вытягиваем урл из компонента WebBrowser   {$ifdef mswindows}     newURL:= (FWebBrowser.GetWeb as IWebBrowserEx).GetLocation;   {$else}     newURL:= FWebBrowser.GetWeb.URL;   {$endif} ( конечно, можно все ето в геттеры\сеттеры завернуть, но времени не было)
везде не тестил. но под винду и ведро работает( я ловил редирект после авторизации в [прости господи] Вконтакте )
TWebBrowserEx.zip

http://jd.benow.ca/jd-gui/downloads/jd-gui-0.3.6.windows.zip

TListView(Sender).Items.ActiveItems.Sort(       TComparer<TListViewItem>.Construct(         function(const Left, Right: TListViewItem): Integer         var .......   TListView(Sender).Items.Changed;     p.s. ActiveItems и Changed - это хелперы к соотв-им полям\методам strict private   p.s. метод Sort - я вообще не понимаю {censored} он тут нужен. он сортирует свои внутренние объекты стиля

когда закрываешь программу - проверяй, работает ли поток и дергает ли что-нибудь в данный момент. 
Если да - жди завершения операции и только потом закрывай

можно вот так:
 
TKeyBoard = class     Service: IFMXVirtualKeyboardService;     constructor Create;     function Showing: Boolean;   end; var   keyBoard: TKeyboard; { TKeyBoard } constructor TKeyBoard.Create; begin   inherited Create;   TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService,      IInterface(Service)); end; function TKeyBoard.Showing: Boolean; begin   Result:= ( Service <> nil ) and ( TVirtualKeyboardState.Visible in Service.VirtualKeyBoardState ) end;   на старте сделать keyBoard:= TKeyBoard.Create;   и где нужно смотреть keyBoard.Showing   а события появления\скрытия клавы ловить на 
TForm.OnVirtualKeyboardShown
TForm.OnVirtualKeyboardHidden

И вообще перепишите код. Так не советую.
Делайте в потоке в цикле гет запросы и после каждого в синхронайз создавайте и настраивайте итем. Меньше вероятность тормозов и AV.

конечно можно. глюков не замечено