Dateiname auslesen und anzeigen

[jaegerschnitzel]

Danke für den Code.

Aber das eigentliche Problem, das ich hatte habt ihr leider nicht erkannt. Wahrscheinlich habe ich mich etwas komisch ausgedrückt.
Also nochmal:
-erstens soll das Ergebnis in einem TEdit angezeigt werden und nicht in einem Popup-Fenster
-und zweitens ist der Pfad "Form1.edit_Folge.Text := '#101';" nicht immer gleich, er ändert sich.
Darum sollte der Pfad zuerst als Variable deklariert werden und dann sollten die Befehle "ChangeFileExt" und "ExtractFileName" angewandt werden. Das ist aber mein Problem. Wie mache ich das mit einer Variablen?