(Moderator)
Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
Delphi 2006 Professional
|
Re: Stringumwandlung
3. Jan 2010, 12:44
Diese Zeile hier ist nicht die beste Art:
CopyDataStruct.cbData:= (Length(Nachricht) + 1) * 2;
Wenn man das "*2" fest rein schreibt ist es kein Wunder das man beim Wechsel zwischen Delphiversionen dann wieder Probleme bekommt. Richtiger wäre hier mit sizeof zu arbeiten.
CopyDataStruct.cbData:= (Length(Nachricht) + 1) * sizeof(Nachricht[1]);
Und das "+1" würde ich weg lassen und stattdessen lieber die Länge mit verschicken und diese dann auch beim Auslesen mit beachten.
Jens Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
|