WebBrowser - NewWindow - Wyskakuja 2 Okna

0

Witam [!!!]

To jest kod ktory tworzy mi forme w ktorej pojawia sie wyskakujace okienko z WebBrowser:

procedure TMainForm.BrowserNewWindow2(ASender: TObject; var ppDisp: IDispatch;
  var Cancel: WordBool);
begin
 NewWindow := TNewWindow.Create(self);
 NewWindow.Show;
 ppDisp := NewWindow.Browser.DefaultDispatch;
end;

Problem jest taki, ze za kazdym razem wyskakuja dwa okna, jedno jest puste, a w drugim jest odpowiednia zawartosc. Jak zrobic zeby wyskakiwalo tylko jedno okno, bez tego pustego ??

PROSZE O POMOC :/

0

hmmm...
prawde mowiac to nie mam pojecia ale zobacz, ze w procedurze jest "Cancel"...
moze na koncu prosedury daj go na True?

1 użytkowników online, w tym zalogowanych: 0, gości: 1