Delphi-Quellcode:
SetLength(TempLokArray, Index+1);
//Daten werden ins Array geschrieben
Array[Index].Var1:= Datensatz.Var1;
Du verwendest da zwei verschiedene Arrays. Willst du das wirklich?
Übrigens: Man verwendet nicht einfach den Variablennamen
Array!