Unicode erkennen

[Zacherl]

Hey,

ich brauche eine Funktion, mit der ich erkennen kann, ob in einem String Unicode Zeichen vorhanden sind. Ich stelle in einer Komponente folgende Procedure bereit::

procedure DoSomething(Text: String) Nun kann der Funktion sowohl ein "normaler" ASCII String übergeben werden, oder aber ein nach String getypecasteter Unicode String der Form:

String(MyWideString) Jetzt muss ich allerdings innerhalb der Funktion wissen, ob es sich um Unicode handelt oder nicht. Überladen der Funktion bzw Hinzufügen eines weiteren Parameters scheidet aus bestimmten Gründen aus.

Hoffe da kann mir jemand helfen.

Gruß Zacherl