kein UpperCase nach OEM Konvertierung mit OemToCharBuff

[Gambit]

Hallo,

ich benutze die API-Funktion OemToCharBuff um eine OEM Konvertierung eines Strings nach Ansi zu erreichen:

Delphi-Quellcode:

Title:= UpperCase(QueryFoundTitles.FieldValues['Titel']);//liegt jetzt als Asci vor
SetLength(OEMTitle, length(Title)); //Speicher reservieren...
OemToCharBuff(PChar(Title), PChar(OEMTitle), Length(Title));// OEM Konvertierung
aList.Add(OEMTitle);

wobei Title und OEMTitle vom Typ ANSIString sind. Die Konvertierung klappt auch, aus N|chte wird Nächte...

Nach der Konvertierung möchte ich ein UpperCase durchführen dabei wird dann aber zB. aus
Nächte ====> NäCHTE das kleine ä wird nicht zum Großbuchstaben gemacht.

Weiß jemand warum das so ist und vielleicht Abhilfe?

Gruß

Gambit