Zitat von
capo:
Wie kann ich dann weiter machen?
Ich stell mir das nicht so einfach vor.
Also den jeweils letzten Buchstaben (direkt hinter dem Punkt vor der Dateiendung) des letzten Listbox-Eintrags bekommst du so:
copy(Listbox1.items.strings[listbox1.count-1], AnsiPos('.',Listbox1.items.strings[listbox1.count-1])-1,1)); // <-- setzt voraus, dass nirgendwo sonst ein Punkt im Pfad oder dem Dateinamen vorkommt, da sonst ein falscher Buchstabe kopiert wird!!
Du kannst so vorgehen, dass diese zunächst geprüft wird und der nächste Eintrag erhöht wird (wenn <> 'z'). Wenn = 'z' dann ein 'a' zwischen dem letzten 'z' und dem Punkt vor der Dateiendung zwischenquetschen. Hoffe du hast mich kapiert. Mein Hirn ist zu so einer späten Stunde nicht mehr in der Lage delphifremde Wörter auszudrücken....
Gruß
Calculon
--