Скачать: CL | DM;

Почему не работает TInternetExplorer не пойму   Найти похожие ветки 

← →
ctapik-net   (2004-08-17 21:16) [0]

Вот пример простейшей проги.
procedure TForm1.Button1Click(Sender: TObject);
begin
ie := TInternetExplorer.Create(Self) ;
ie.Connect;
ie.Visible := True ;
ie.OnNewWindow2 := n ;
end;

procedure TForm1.n(Sender: TObject; var ppDisp, Cancel: OleVariant);
begin
Cancel := true ;
end;
Почему при "Cancel := true ;" окна все равно открываются через "Open new window" в контекстном меню?

---

← →
Sun bittern ©   (2004-08-17 21:45) [1]

TInternetExplorer

А это с какой палитры компонент? Чето я не вижу.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.022 c