mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-10-22 06:52:12 +02:00
IDE+tpipro: fixed circular interface references, bug #11564
git-svn-id: trunk@16419 -
This commit is contained in:
parent
42d9edefb2
commit
77bd9607bc
@ -68,7 +68,7 @@ begin
|
||||
HTMLControl:=TIPLazHtmlControl.Create(Owner);
|
||||
Result:=HTMLControl;
|
||||
if Provider=nil then
|
||||
Provider:=CreateIDEHTMLProvider(Owner);
|
||||
Provider:=CreateIDEHTMLProvider(HTMLControl);
|
||||
Provider.ControlIntf:=HTMLControl;
|
||||
HTMLControl.Provider:=Provider;
|
||||
end;
|
||||
|
@ -228,7 +228,7 @@ begin
|
||||
HTMLControl:=TSimpleHTMLControl.Create(Owner);
|
||||
Result:=HTMLControl;
|
||||
if Provider=nil then
|
||||
Provider:=CreateIDEHTMLProvider(Owner);
|
||||
Provider:=CreateIDEHTMLProvider(HTMLControl);
|
||||
Provider.ControlIntf:=HTMLControl;
|
||||
HTMLControl.Provider:=Provider;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user