ersetze
PAnsiChar durch PChar
AnsiString durch String
und bei den Funktioen Move und CompareMem die "Länge" mit SizeOf(Char) multiplizieren
dann hast du eine Version, welche unter D2009 Uniode und in den anderen Delphis
ANSI ist (also auf
String basiert)
(das gilt für die 2. Version ... bei der 1. Version ist es aber vermutlich identisch)
gilt für beide Versionen ... oben sind diesbezüglich ist in Version 1 nichts anders