RxFPC: fix av on delete ToolBar SelectedImageList

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6300 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2018-04-10 20:37:18 +00:00
parent 65282d026d
commit 83c8453de8
1 changed files with 3 additions and 0 deletions
--- a/components/rx/trunk/rxcontrols/rxtoolbar.pas
+++ b/components/rx/trunk/rxcontrols/rxtoolbar.pas
@ -1081,6 +1081,9 @@ begin
    if AComponent = FImageList then
      SetImageList(nil)
    else
+    if AComponent = FImageListSelected then
+      SetImageListSelected(nil)
+    else
    if AComponent is TPopupMenu then
    begin
      for i:=0 to FToolbarItems.Count - 1 do