From 1168502a519312e3ee064161a519f4983aaba660 Mon Sep 17 00:00:00 2001 From: gambas Date: Fri, 15 Apr 2022 15:09:36 +0200 Subject: [PATCH] ComboBox: Setting the 'Index' property to '-1' whereas it is already '-1' must not raise the 'Click' event. [GB.GUI.BASE] * BUG: ComboBox: Setting the 'Index' property to '-1' whereas it is already '-1' must not raise the 'Click' event. --- comp/src/gb.gui.base/.src/ComboBox/ComboBox.class | 2 ++ 1 file changed, 2 insertions(+) diff --git a/comp/src/gb.gui.base/.src/ComboBox/ComboBox.class b/comp/src/gb.gui.base/.src/ComboBox/ComboBox.class index ee57a6857..1592ff2f0 100644 --- a/comp/src/gb.gui.base/.src/ComboBox/ComboBox.class +++ b/comp/src/gb.gui.base/.src/ComboBox/ComboBox.class @@ -383,6 +383,8 @@ Private Sub Index_Write(Value As Integer) If Value < -1 Or If Value >= $aList.Count Then Error.Raise("Bad argument") + If $iIndex < 0 And If Value < 0 Then Return + Sort() If $bReadOnly Then If $iIndex <> Value Then