Irgendwas stimmt an deinem Konzept nicht.
Schreibe die Variablen doch in ein Array und gehe es in einer Schleife durch o.ä.
100 einzelne Variablen sind garantiert nicht notwendig.
Delphi-Quellcode:
var
n: array[1..100] of string;
// bzw
var
n: array of string;
SetLength(n, 100);
for i := Low(n) to High(n) do
begin
// ...
end;