Bläddra i källkod

* Trigger onrender after all clients handled render

Michaël Van Canneyt 2 år sedan
förälder
incheckning
19ca444485
1 ändrade filer med 2 tillägg och 2 borttagningar
  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;