Delphi-PRAXiS - Delphi Letztes Vorkommen eines Zeichens in einem String ermitteln

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Letztes Vorkommen eines Zeichens in einem String ermitteln (https://www.delphipraxis.net/1222-letztes-vorkommen-eines-zeichens-einem-string-ermitteln.html)

rebugger

2. Nov 2002 15:03

Letztes Vorkommen eines Zeichens in einem String ermitteln

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

2. Nov 2002 15:21

Moin Rebugger,

schau Dir mal die Funktionen

ExtractFileExt bzw. LastDelimiter an.

rebugger

2. Nov 2002 15:24

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

Christian Seehase

2. Nov 2002 15:26

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.

Alle Zeitangaben in WEZ +1. Es ist jetzt 02:40 Uhr.