PChar zu String!

[r_kerber]

ich denke in Deinem Beispiel ist das StrPas einfach zuviel, da die Funktion datetoday ja auch schon String zurückliefert. Also sollte eigentlich keine weitere Typumwandlung erforderlich sein!
Und noch ein Tip für Deine case-Anweisung: Wenn Du zusätzlich noch einen else-Zweig einbaust, kannst Du Dir die if-Abfrage sparen.