после этого обе переменные указывают на один и тот же класс
исправлять можно по всякому, один из вариантов вроде такого:
Код:
uses contnrs;
Record = class
...
constructor (v1,v2,v3)
end
MyClass = class(TObjectList) // ему размерность не надо фиксировать, сколько добавишь столько и будет
...