From ae0b11dfa862051061b37b42d5a327debad015b0 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sat, 5 Jan 2019 21:22:47 +0000
Subject: [PATCH] RxFPC:RxToolbar - fix loading old config files

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6780 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/trunk/rxcontrols/rxtoolbar.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/components/rx/trunk/rxcontrols/rxtoolbar.pas b/components/rx/trunk/rxcontrols/rxtoolbar.pas
index 82c0f7732..fb61f05e5 100644
--- a/components/rx/trunk/rxcontrols/rxtoolbar.pas
+++ b/components/rx/trunk/rxcontrols/rxtoolbar.pas
@@ -985,6 +985,7 @@ var
 begin
   ACount:=FPropertyStorageLink.Storage.ReadInteger(ASection+sCount, -1);
   if ACount < 0 then Exit(false);
+  FVisibleItems.Clear;
   Result:=true;
   S:=ASection+sItem;
   St:=TStringList.Create;
@@ -1043,6 +1044,7 @@ begin
   S:=ASection;
   FCnt:=FPropertyStorageLink.Storage.ReadInteger(S+sVersion2, FVersion);
   if FCnt < FVersion then Exit;
+  FVisibleItems.Clear;
   for P in Items do P.Visible:=false;
   St:=TStringList.Create;
   FCnt:=FPropertyStorageLink.Storage.ReadInteger(S+sCount, 0);
@@ -1105,7 +1107,6 @@ var
 begin
   S:=Owner.Name+'.'+Name;
   ACount:=FPropertyStorageLink.Storage.ReadInteger(S+sVersion2, -9999); //Check cfg version
-  FVisibleItems.Clear;
 
   Items.BeginUpdate;
   if ACount = -9999 then