Пример не рабочий ... нет кучи инклюдов, мне нужно найти их самостоятельно тратить время?
В функции _Combo() присутствует без конечный цикл While 1
Функция DllClose($Dll) не на месте
Не знаю особо не проверял, не вникал в не рабочий пример! :-*
Код:
AdlibRegister('_Combo')
;~ ....
;~ ....
;~ ....
Func _Combo()
If ($Index) And (($Index <> $pIndex) Or (TimerDiff($Timer) > 1000)) Then
$Data = _WinAPI_GetIfEntry($Adapter[$Index][0], $Dll)
If Not @error Then
GUICtrlSetData($Label41, _Str($Data[14]) & ' bytes')
GUICtrlSetData($Label42, _Str($Data[8 ]) & ' bytes')
GUICtrlSetData($Label41 + 1, StringFormat('%.2f', $Data[14] / 1024 / 1024) & ' MB')
GUICtrlSetData($Label42 + 1, StringFormat('%.2f', $Data[8 ] / 1024 / 1024) & ' MB')
Else
GUICtrlSetData($Label41, '')
GUICtrlSetData($Label42, '')
EndIf
$Timer = TimerInit()
$pIndex = $Index
EndIf
$Index = _GUICtrlComboBox_GetCurSel($Combo) + 1
EndFunc