Problem z kursorem

Witam. Mam poważny problem z kursorem. Podczas pobierania adresu strony z IE 7 zwykły kursor zmienia się na kursor "zajęty" i zaczyna migotać. Wszystko ma miejsce niezależnie od tego w jaki sposób pobieram adres strony czy za pomocą uchwytów czy TDdeClient. Spróbowałem umieścić procedure w oddzielnym wątku lecz to nic niedało. To mruganie jest strasznie uciążliwe gdyż musze pobierać adres co kilka sekund. Z góry dziękuje za pomoc. [???]

W razie czego poniżej zamieszczam procedure pobierającą adres:

function TMainForm.GetURL3:string;
var
  ie,toolbar,combo,
  comboboxex,edit,
  worker,toolbarwindow,band:hwnd;
begin
  ie := FindWindow(pchar('IEFrame'),nil);
 worker := FindWindowEx(ie,0,'WorkerW',nil);
  toolbar := FindWindowEx(worker,0,'rebarwindow32',nil);

  band := FindWindowEx(toolbar,0,'address band root',nil);

  comboboxex := FindWindowEx(band, 0, 'comboboxex32', nil);
  combo := FindWindowEx(comboboxex,0,'ComboBox',nil);
  edit := FindWindowEx(combo,0,'Edit',nil);
  toolbarwindow := FindWindowEx(comboboxex, 0, 'toolbarwindow32', nil);

  result := GetText(edit);
end;