| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Открытие в новом окне (Зависание) [D6, Win95/98, WinME, Win2k, WinXP]

Dennisius ©   (2004-05-26 11:51:00) 

Здраствуйте что бы открыть из своего браузера новое окно в экземпляре собственного браузера и использую код :

procedure TForm.WebBrowser1NewWindow2(Sender: TObject;
 var ppDisp: IDispatch; var Cancel: WordBool);
Var newForm :TWebForm;
begin
newForm:=TWebForm.Create(ShellForm);
newForm.Show;
ppDisp:=newForm.WebBrowser1.ControlInterface;
end;

но программа подвисает и окно открывается только спустя 4-3 секунды это естественно не дело , подскажите а че так, и чего делат.

---

Dennisius   (2004-06-17 13:10:00) [1]

> VMcL ©   (16.06.04 18:29) [6]
> >>Dennisius  (27.05.04 10:21) [5]
>
> Очень напоминает торможение при включенном AVP мониторе.
> ?


А ты скорее всего прав действительнои без антивируса вообще быстрее. фанкью

---

VMcL   (2004-06-16 18:29:00) [2]

>>Dennisius  (27.05.04 10:21) [5]

Очень напоминает торможение при включенном AVP мониторе.
?

---

Dennisius   (2004-05-27 10:21:00) [3]

> nikkie ©   (26.05.04 17:34) [4]
> 1. а если ты создаешь TWebForm не в OnNewWindow, а сам -
> быстро окно появляется?
>
> 2. приведи, если есть, код в TWebForm.Create, OnCreate,
> OnShow
>
> 3. попробуй не создавать окно с новым WebBrowser-ом, а положить
> WebBrowser на ShellForm и переадресовывать туда. а в ShellForm.WebBrowser.OnBeforeNavigate
> - создавать TWebForm


без
ppDisp:=newForm.WebBrowser1.ControlInterface;
и с этим кодом все равно видимо сам браузер создается ровно 3 секунды

---

nikkie   (2004-05-26 17:34:00) [4]

1. а если ты создаешь TWebForm не в OnNewWindow, а сам - быстро окно появляется?

2. приведи, если есть, код в TWebForm.Create, OnCreate, OnShow

3. попробуй не создавать окно с новым WebBrowser-ом, а положить WebBrowser на ShellForm и переадресовывать туда. а в ShellForm.WebBrowser.OnBeforeNavigate - создавать TWebForm

---

VMcL   (2004-05-26 16:50:00) [5]

>>Dennisius  (26.05.04 16:45) [2]

Посмотри отладчиком в каком именно месте тормозит.

---

Dennisius   (2004-05-26 16:45:00) [6]

> Ihor Osov'yak ©   (26.05.04 15:48) [1]
> с первого взгляда - все нормально. Правда, не совсем понятно,
> почему в качестве owner - ShellForm..
> ... Я думаю, что проблема все же не в коде, который здесь
> приведен.

ShellForm это MDIForm, все остальные MDIChild

---

Ihor Osov'yak   (2004-05-26 15:48:00) [7]

с первого взгляда - все нормально. Правда, не совсем понятно, почему в качестве owner - ShellForm..
... Я думаю, что проблема все же не в коде, который здесь приведен.

---

Наверх