Question

I have classnames in a stringlist. For example it could be
‘TPlanEvent’, ‘TParcel’, ‘TCountry’ etc.

Now I want to find out the sizes by looping the list.

It works to have:

Size := TCountry.InstanceSize;

But I want it like this:

for i := 0 to ClassList.Count - 1 do
  Size := StringToClass(ClassList[i]).InstanceSize;

Obviously my question is what to write instead of method StringToClass to convert the string to a class.

Answer 1

Since you’re using a stringlist you can store the classes there, too:

var
  C: TClass;

  StringList.AddObject(C.ClassName, TObject(C));

…

for I := 0 to StringList.Count - 1 do
  Size := TClass(StringList.Objects[I]).InstanceSize;

…