Ich habe jetzt das new() und Dispose() weggelassen und als Parameter "aRecord:TeinRecord" anstatt "aRecord

TeinRecord" übergeben.
Sieht so aus als hätte ich mir das Leben zu schwehr gemacht. Es funktioniert soweit.
Sharemem will ich bewusst nicht benutzen, weil die
API kompatibel mit C++ sein muss.
Danke.