Parcourir la source

* Trigger onrender after all clients handled render

Michaël Van Canneyt il y a 2 ans
Parent
commit
19ca444485
1 fichiers modifiés avec 2 ajouts et 2 suppressions
  1. 2 2
      packages/htmlfragment/htmlfragment.pas

+ 2 - 2
packages/htmlfragment/htmlfragment.pas

@@ -279,11 +279,11 @@ Var
   aClient : IFragmentClient;
 
 begin
-  if Assigned(FOnRendered) then
-    FOnRendered(Self);
   For I:=0 to ComponentCount-1 do
     if Supports(Components[i],IFRagmentClient,aClient) then
       aClient.HTMLRendered;
+  if Assigned(FOnRendered) then
+    FOnRendered(Self);
 end;
 
 procedure TCustomHTMLFragment.DoOnUnRender;