Dynamisches Array: Terminierung auf 1

[Garfield]

Ich hatte vor einiger Zeit ein Programm in Delphi 3 Professional begonnen und dann in Delphi 7 Personal weitergeführt. Darin verwende ich ein statisches Array, welches ich damals der Einfachheit halber mit 1 terminiert hatte. Nun möchte ich daraus ein dynamisches Array machen. Dynamische Arrays sind jedoch nullterminiert. Das Umstellen auf die andere Terminierung ist sehr aufwändig und trotz mehrerer Stunden Arbeit erhalte ich immer wieder neue Fehlermeldungen. Deshalb würde ich gern die Terminierung von 0 auf 1 ändern. Leider habe ich dazu nichts gefunden.