Здравствуйте! Помогите разобраться пж-ста.
Есть массив ИП адресов, совпадения подкрашиваются одинаковым цветом, не могу добиться чтобы при отсутствии совпадения цвета не было,
все равно подсовывает цвет, ведь в массиве он находит и сам себя
Вот код:
Есть массив ИП адресов, совпадения подкрашиваются одинаковым цветом, не могу добиться чтобы при отсутствии совпадения цвета не было,
все равно подсовывает цвет, ведь в массиве он находит и сам себя
Вот код:
Код:
$Label1 = GUICtrlCreateLabel($text1, 36, 20, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
$Label2 = GUICtrlCreateLabel($text2, 36, 46, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
$Label3 = GUICtrlCreateLabel($text3, 36, 72, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
$Label4 = GUICtrlCreateLabel($text4, 36, 98, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
$Label5 = GUICtrlCreateLabel($text5, 36, 124, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
Dim $ip[] = [$text1, $text2, $text3, $text4, $text5]
Dim $colour[] = ["0x9d9d9d","0xdca537","0x5e37dc","0x3f8431","0xd1428c"]
For $i = 0 To UBound($ip) - 1
For $i = 0 To UBound($colour) - 1
If $text1 = $ip[$i] then
GUICtrlSetBkColor($Label1, $colour[$i])
Else
GUICtrlSetBkColor($Label1, $GUI_BKCOLOR_TRANSPARENT)
EndIf
If $text2 = $ip[$i] then GUICtrlSetBkColor($Label2, $colour[$i])
If $text3 = $ip[$i] then GUICtrlSetBkColor($Label3, $colour[$i])
If $text4 = $ip[$i] then GUICtrlSetBkColor($Label4, $colour[$i])
If $text5 = $ip[$i] then GUICtrlSetBkColor($Label5, $colour[$i])
Next
Next