In neueren Delphiversionen schon.
Noch ... wer weiß wann wir UCS4 bekommen.
Zitat:
GetMem(Text, sizeof(Text) + 1);
Ein bissl wenig Speicher?
TextLength * SizeOf(WideChar)
oder
(TextLength + 1) * SizeOf(WideChar)
, jenachdem ob die #0 in TextLength schon mit enthalten ist