Record mit dynamischen Strings versenden

[luke2]

Hi,

wenn man ein Record per Socket versenden möchte, der Strings enthält, müssen diese ja eine feste Länge haben.

Delphi-Quellcode:

type
  TData = record
    I: Integer;
    R: Real;
    S1: string[50]; //OK
    S2: ShortString; //OK
    S3: string; //geht nicht
  end;

SendBuffer(Socket, Data, SizeOf(Data));

Da die zu versendenden Strings unterschiedlich lang sein können, muss immer der worst-case (bsp. ShortStrings, also 255 Zeichen) angenommen werden. Bei kurzen Strings ist die Datenmenge damit viel größer als nötig.

Natürlich könnte ich alle Strings mit einem Trennzeichen zusammenfassen und dann versenden, diese Lösung erscheint mir aber nicht sonderlich sauber und deshalb wollte ich fragen, ob es eine bessere Lösung gibt ein Record mit dynamischen Strings per Socket zu senden?

[Bummi]

sauber Serialisieren
also vor den String die Länge schicken ...

[himitsu]

Nja, man könnte zwar den Record versenden und die dynamischen Strings getrennt davon, aber bei Empfangen muß man auf die internen Zeiger der dynamischen stuckturen aufpassen, damit man sich nicht das Speichermanagement zerschießt.


Die Daten schön handlich in/aus einen TReader/TWriter serialisieren?
Oder du nimmst einfach ein statisches Array[..] of Char.

[stahli]

@ luke2
Evtl. kannst Du hier mal mitlesen und eine Anregung entnehmen...