|
Registriert seit: 8. Aug 2004
Ort: Hamburg
26 Beiträge
Delphi 7 Enterprise
|
Re: problem mit meinem chat
14. Jan 2005, 01:58
ganz schlaue Lösung und viel schneller
SetLength(s, length(s) - 2); // funzt immer wegen WideChar
oder
len:= length(s);
byte(s[0]):= len - 2; // funzt nur bei strings bis 255 zeichen
Gruß
Hardy
Es gibt keinen schöneren Tag als den heutigen. Der gestrige ist vorbei und von den kommenden weiß man nicht was sie bringen.
|