War noch im editieren.
Du müßtest auch noch das Inc an den Record anpassen. (die Daten/Records liegen wohl hintereinander im Speicher)
Falls eine Pointerarithmetik für den Record vorhanden ist, dann köndest du das INC weglassen und über
PUserInfo1(ui1)[index].usri1_name
drauf zugreifen.
Eventuell kann man auch gleich das ui1 als PUserInfo1 deklarieren. (
ui1[index].usri1_name
)
Womit dann Delphi, direkt beim Aufruf, jeweils ein implizites INC einbaut.