Müsste das:
LListItem.SubItems.Add(ByteListToString(bin[c][x]))
nicht so
LListItem.SubItems.Add(ByteListToString(LBinItem[x]))
sein? Oder ist es egal?
Und beim generieren zum Testen mal ersetzen:
Delphi-Quellcode:
AListItem.Caption := c.ToString();
AListItem.SubItems.Add(LVorname);
AListItem.SubItems.Add(LNachname);
//durch
AListItem.Caption := ByteListToString(bin[c][0]);
AListItem.SubItems.Add(ByteListToString(bin[c][1]));
AListItem.SubItems.Add(ByteListToString(bin[c][2]));