From 07d8c3bf79b2e2109886be6c255854a64d30afa1 Mon Sep 17 00:00:00 2001 From: alexs75 Date: Sun, 2 Jun 2013 19:38:20 +0000 Subject: [PATCH] RxToolPanel - fix owner for TToolbarItems git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2741 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/rx/rxtoolbar.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/components/rx/rxtoolbar.pas b/components/rx/rxtoolbar.pas index 410e058b9..e70c1e15e 100644 --- a/components/rx/rxtoolbar.pas +++ b/components/rx/rxtoolbar.pas @@ -167,7 +167,7 @@ type { TToolbarItems } - TToolbarItems = class(TCollection) + TToolbarItems = class(TOwnedCollection) private FToolPanel:TToolPanel; function GetByActionName(ActionName: string): TToolbarItem; @@ -839,7 +839,7 @@ end; constructor TToolbarItems.Create(ToolPanel: TToolPanel); begin - inherited Create(TToolbarItem); + inherited Create(ToolPanel, TToolbarItem); FToolPanel:=ToolPanel; end;