Delphi String zählen und bis zum Punkt entfernen

[Back2Code]

Hi DP,

ich bin dabei einen String zu zählen und weiß aber nicht genau wie ich dann bei dem String alles entferne von hinten bis zum Punkt (BSP : test.txt ----> test)


Bis jetzt siehts so bei mir aus :

Delphi-Quellcode:

function ChangeExtension(const filename, extension : string) : string;
var i : Integer;
begin
  for i:= Length(filename) downto 1 do

[mkinzler]

Chau dir Mal ChangeFileExt() an

[Back2Code]

Zitat von mkinzler:

Chau dir Mal ChangeFileExt() an

Erstmal gehts ja nur um einen String. Sprich, rückwärts einen String zählen bis der erste Punkt kommt und dann ab da an alles entfernen.


bsp.

filename := dp.html;

(Funktion für das entfernen der Extension im String)

filename := dp;

[Klaus01]

fileName := changeFileExt(fileName,''); Grüße
Klaus

[mkinzler]

Hättest du die verlinkte Funktionsbeschreibung gelesen, hättest du gesehen, dass die Funktion genau das macht, was du willst!

[Back2Code]

Funktioniert super. Danke.

[Klaus01]

Guten Morgen,

gibt es in Delphi 5 noch nicht die Routine changeFileExt?

Grüße
Klaus