Browse Source

* Small change in indexed property .ToString

Michaël Van Canneyt 7 months ago
parent
commit
b447ab211f
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/rtl-objpas/src/inc/rtti.pp

+ 1 - 1
packages/rtl-objpas/src/inc/rtti.pp

@@ -6028,7 +6028,7 @@ begin
   for i := 0 to params^.Count - 2 do
   for i := 0 to params^.Count - 2 do
   begin
   begin
     param := params^.Params[i];
     param := params^.Params[i];
-    Result := Result + param.Name + ': ' + param.ParamType^^.Name + ', ';
+    Result := Result + param.Name + ': ' + param.ParamType^^.Name + '; ';
   end;
   end;
   param := params^.Params[params^.Count - 1];
   param := params^.Params[params^.Count - 1];
   Result := Result + param.Name + ': ' + param.ParamType^^.Name + ']: ' + PropertyType.Name;
   Result := Result + param.Name + ': ' + param.ParamType^^.Name + ']: ' + PropertyType.Name;