mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-30 05:30:45 +02:00
lazcontrols: TLvlGraphControl: accept child controls in designer
git-svn-id: trunk@44214 -
This commit is contained in:
parent
49c0f86ee9
commit
e0d5158221
@ -2616,6 +2616,7 @@ end;
|
||||
constructor TCustomLvlGraphControl.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited Create(AOwner);
|
||||
ControlStyle:=ControlStyle+[csAcceptsControls];
|
||||
FOptions:=DefaultLvlGraphCtrlOptions;
|
||||
FGraph:=TLvlGraph.Create;
|
||||
FGraph.OnInvalidate:=@GraphInvalidate;
|
||||
|
Loading…
Reference in New Issue
Block a user