И как теперь вынуть текст отображённый в графах не представляю. заранее спасибо.
Код:
Код: Выделить всё
For $i = 1 to 100
$regEnumVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\t\tt", $i)
if @error 0 Then ExitLoop
TrayCreateItem($regEnumVal)
nextКод: Выделить всё
For $i = 1 to 100
$regEnumVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\t\tt", $i)
if @error 0 Then ExitLoop
TrayCreateItem($regEnumVal)
nextКод: Выделить всё
For $i = 1 to 100
$regEnumVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\t\tt", $i) ;читаем в цикле реестр
if @error 0 Then ExitLoop
TrayCreateItem($regEnumVal) ; добавляем в трей IP
TrayItemSetOnEvent(-1,"TrayPing") ; выполнение функции при нажатии на IP в трее
next
Func TrayPing()
TrayTip(TrayItemGetText(@TRAY_ID), "", 2, 1)
EndFunc