OpenDialog FileName?

[MathiasSimmack]

Zitat:

Zitat von Matze

Mit pos kann ich das ja nicht lösen, da ich jede Endung manuell einstellen müsste, was ja unmöglich ist. :gruebel:

Wieso? Mit "pos" kannst du aber immerhin feststellen, ob überhaupt ein Punkt im angegebenen Dateinamen existiert. Wenn nicht, dann lieferst du den Dateinamen unverändert zurück, weil er dann keine Endung enthält. Wenn doch, dann gehst du vom Ende des Dateinamens (= String) solange eine Stelle zurück, bis du den Punkt findest - und dann kopierst du den Anfang des Namens bis zu dieser Stelle. Fertig.

Ich denke, anders wird´s auch Borlands "ChangeFileExt" nicht machen. Zumindest habe ich das so gemacht, als ich die Funktion für nonVCL-Projekte selbst geschrieben habe (wg. der SysUtils-Unit, die die Programme ja größer macht).

[Nalincah]

Ich weiß, hab auch gesucht, aber es irgendwie nicht gefunden *g*

Wenn man die Sache von hinten aufzieht dann nicht
C:\Windows\dasdas.dasdas.txt
von hinten erkennt der das ".txt"

[Matze]

Vielen Dank euch allen! :D

[avadex]

ich hab es einfach so gemacht

Delphi-Quellcode:

label1.caption := ExtractFileName(OpenDialog1.FileName);

ist am einfachsten!

[Matze]

Falls du mich ansprechen solltest ;)

Die Endungen müssten bei deiner Version aber noch vorhanden sein (.exe, .bmp, ...).

[avadex]

Zitat:

Zitat von Matze

Falls du mich ansprechen solltest ;)

Die Endungen müssten bei deiner Version aber noch vorhanden sein (.exe, .bmp, ...).

ja, so wollte ich das ja auch! Endung sollte mit angezeigt werden!