* IFragmentClient is now alias to IHTMLClient

This commit is contained in:
Michaël Van Canneyt 2022-06-22 16:59:37 +02:00
parent d03f94beaf
commit 326b571d8d

View File

@ -6,20 +6,13 @@ unit htmlfragment;
interface
uses
{$ifdef pas2js} web,{$endif} Classes, SysUtils;
{$ifdef pas2js} web,{$endif} Classes, SysUtils, Rtl.HTMLUtils;
Type
TCustomHTMLFragment = class;
{ TFragmentHandler }
IRendered = Interface
Procedure HTMLAvailable;
end;
IFragmentClient = Interface ['{984EDD58-4F93-40BA-A757-06AC293D11F9}']
Procedure HTMLLoaded;
Procedure HTMLRendered;
end;
IFragmentClient = Rtl.HTMLUtils.IHTMLClient;
TFragmentHandler = Class(TObject)