Man kann die Stringliste natürlich auch weglassen und sofort die gefundenen Dateien verarbeiten.
- über FindFirst die Dateien suchen (
'*_*-*.*'
oder einfach nur
'*.*'
)
- per RegEx die Dateinamen zerlegen
- neu zusammensetzen und kopieren
- oder suchen, gleich per RegEx-Repleace nur den gewünschten Teil ersetzen und dann kopieren
FindFirst +
CopyFile
TDirectory.GetFiles +
TFile.Copy
FindFirst/
FindFirstFile +
SHFileOperation
...