Delphi-Quellcode:
Len := Length(T);
Stream.Write(Len, SizeOf(Len));
for I := 0 to Length(T) - 1 do
begin
Len := Length(T[I].B);
Stream.Write(Len, SizeOf(Len));
Stream.Write(PChar(T[I].B), Len);
sieht eigentlich OK aus, wenn B der String ist
er speichert die Arraylänge und dann jeweils die Länge von B, sowie dessen Inhalt?
[edit]
getäucht ... ein ^ zuviel