diff --git a/lcl/include/radiogroup.inc b/lcl/include/radiogroup.inc
index fe3c3141cd..b76ce07e00 100644
--- a/lcl/include/radiogroup.inc
+++ b/lcl/include/radiogroup.inc
@@ -420,6 +420,7 @@ begin
       begin
         if Assigned(FOnClick) then FOnClick(Self);
         if Assigned(FOnSelectionChanged) then FOnSelectionChanged(Self);
+        FLastClickedItemIndex := FItemIndex;
       end;
     end;
   end;