Problem mit Zeigern

[Gambit]

Hallo,

ich verwende hier eine API-Funktion(OemToCharBuff) die als Parameter PAnsiChar erwartet und ANSI-Text in OEM-Text umwandelt:

Auszug aus meiner Procedur:

Delphi-Quellcode:

If isUseOEM then
      begin
        Title:= PChar(QueryRef.FieldByName('aString').AsString);
        getMem(OEMTitle, length(Title));
        OemToCharBuff(Title, OEMTitle, Length(Title));
        FormSelectedTitles.ListBoxFoundTitles.Items.Add(OEMTitle);
        FreeMem(OEMTitle);
      end

wobei Title und OEMTitle vom Typ PAnsiChar sind.

Wenn ich die Procedure zum ersten Mal aufrufe funzt es einwandfrei. Rufe ich sie ein zweites Mal auf, bekomme ich zwar auch meinen umgewandelten Text, dahinter stehen dann aber oft noch merkwürdige Sonderzeichen wie ein § oder ein A mit Dach oder ähnliches.
Was mache ich denn hier noch falsch?

Gruß

Gambit