Letztes Vorkommen eines Zeichens in einem String ermitteln

[rebugger]

Hallo,
ich habe folgende Funktion:

Code:

extension := Copy(OpenDialog.FileName, Pos('.',OpenDialog.FileName)+1, Length(OpenDialog.FileName)-Pos('.',OpenDialog.FileName)+1);

Nur leider sucht er hier das erste Vorkommen von '.' !
Ich brauche aber das letzte ! Gibt es dazu eine bestimmte Funktion ?
Ich konnte leider nichts finden !

[Christian Seehase]

Moin Rebugger,

schau Dir mal die Funktionen

ExtractFileExt bzw. LastDelimiter an.

[rebugger]

Juhu, Christian, du bist spitze !
Vielen Dank...

[Christian Seehase]

Moin Rebugger,

danke.
Ich hab' noch etwas vergessen:
Hier in der CodeLibrary hat sakura noch eine Variante der Pos Funktion gepostet, mit der das wohl auch ginge, was Dir vorschwebt.