Fehler beim Senden übers Netzwerk

[cyberkiller0072001]

Ich habe folgenden Buffer:

Delphi-Quellcode:

package = record
  position: string[2];
  aint: array of integer;
  abool: array of boolean;
end;

Leider bekomme ich, wenn ich ein solches Package verschicken will, vom TClientsocket zum TServersocket, macht der server macken bei:

If APackage.position='CI' then...
Hat jemand eine Idee??

[alcaeus]

Wenn dein Record package heisst solltest du das evtl. aendern. Package ist ein reserviertes Wort.
Ausserdem waere die Fehlermeldung nicht ganz uninteressant ;)

Greetz
alcaeus

[Muetze1]

Moin!

Vor allem: Wie schreibst du den Buffer in den Socket? Es klappt zumindest nicht, wenn du den gesamten Record auf einmal in den Record schreibst - du musst ihn einzelnd in den Stream hauen. Du musst die Grösse der dynamischen Arrays vorher übermitteln und danach die Array Elemente. Der Record so enthält an Stelle der dynamischen Records im Speicher nur jeweils einen Zeiger und daher werden nicht die Daten selber übertragen. Ist das gleiche Problem wie bei den Strings (nicht-ShortStrings)...

MfG
Muetze1