Explorar o código

* Add/RemoveClasses now directly sets classes

michael %!s(int64=4) %!d(string=hai) anos
pai
achega
5aafee91b1
Modificáronse 1 ficheiros con 4 adicións e 2 borrados
  1. 4 2
      packages/webwidget/webwidget.pas

+ 4 - 2
packages/webwidget/webwidget.pas

@@ -2974,14 +2974,16 @@ end;
 
 function TCustomWebWidget.RemoveClasses(const aClasses: String; Normalize : Boolean = false): String;
 begin
-  Result:=RemoveClasses(FClasses,aClasses,Normalize);
+  FClasses:=RemoveClasses(FClasses,aClasses,Normalize);
+  Result:=FClasses;
   if IsRendered then
     Result:=RemoveClasses(FElement,aClasses,Normalize)
 end;
 
 function TCustomWebWidget.AddClasses(const aClasses: String; Normalize: Boolean): String;
 begin
-  Result:=AddClasses(FClasses,aClasses,Normalize);
+  FClasses:=AddClasses(FClasses,aClasses,Normalize);
+  Result:=FClasses;
   if IsRendered then
     Result:=AddClasses(FElement,aClasses,Normalize)
 end;