Ожидание загрузки IE в GUICtrlCreateTab

[Arei]

Привет, столкнулся с такой проблемой:Если при создании программы присутствует много Tab-ов и в каждом находится объект IE, то это очень сильно тормозит скорость запуска программы(ваш КЭП), захотел решить таким способом, подгружать только тот TAb по которому кликнули мышью, но получается эффект, что на вкладку перешли, а страница еще не загрузилась, вот и подошли мы к главному вопросу, как сделать ожидание перехода по вкладке с полной загрузкой страницы.
Заранее спасибо.

Прилагаю код.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 767, 521, 192, 124)
$Tab1 = GUICtrlCreateTab(0, 0, 700, 500)
GUICtrlCreateTabItem("Привет")
$Label1 = GUICtrlCreateLabel("Пример", 56, 72, 36, 17)

GUICtrlCreateTabItem("Привет")
$Obj121 = ObjCreate("Shell.Explorer.2")
$Obj1_ctrl22 = GUICtrlCreateObj($Obj121, 10, 20, 700, 500)

GUICtrlCreateTabItem("Пока")
$Obj21 = ObjCreate("Shell.Explorer.2")
$Obj1_ctrl2 = GUICtrlCreateObj($Obj21, 10, 20, 700, 500)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE

			Exit
Case $Tab1
            Switch GUICtrlRead($Tab1)
				Case 1
				_IENavigate($Obj121, 'www.yandex.ru')
				Case 2
				_IENavigate($Obj21, 'www.ya.ru')

            EndSwitch
	EndSwitch
WEnd

Вот при загрузки страницы, хотел и сделать эффект.

 

[madmasles]

Arei,
Код где?

 

[Arei]

Он плохой и не красивый, обычный стандартный.Или он очень нужен?


Добавлено:

Сообщение автоматически объединено: 30 Июл 2012

Добавил код.