höchsten Array-Index herabsetzen - in Delphi 3

[Coder]

Hallo!

private
blabla: Array[1..999] of String;

Ich möchte mit Delphi 3 gerne die Anzahl von verwendeten Feldern in Arrays reduzieren.
Wenn z.B. ein Array 98 Werte habe,
ich high (Arryname$) aufrufe und dafür 98 erhalte,
dann alle Felder löschen möchte,
um die Felder neu zu befüllen.
Diesmal weniger ..nur 48 Strings (1 je Felde) in den Array.
Wiederhole ich high (Arryname$),
dann würde ich theoretisch 48 erhalten wollen.
Praktisch kommen aber wider 98.

Kann man unter Delphi 3 noch einen anderen Weg einschlagen um die Felder zu dezimieren?

ich hoffe, ich habe mich klar ausgedrückt ...
sonst bitte nachfragen.