Ne funktioniert wirklich nicht. Das liegt am Injizieren. Habs allerdings grade hinbekommen. S1 und S2 als ShortString deklarieren und folgendes verwenden:
Delphi-Quellcode:
CopyMemory(@S[1], Mem, 510);
CopyMemory(@S1[1], @S[1], 255);
CopyMemory(@S2[1], @S[256], 255);