paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

RxToolPanel - fix owner for TToolbarItems

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2741 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75 2013-06-02 19:38:20 +00:00
parent 4512219d6f
commit 07d8c3bf79
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/rx/rxtoolbar.pas
View File

@ -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;