Welcome to the new platform of Programmers Heaven! We apologize for the inconvenience caused, if you visited us from a broken link of the previous version. The main reason to move to a new platform is to provide more effective and collaborative experience to you all. Please feel free to experience the new platform and use it's exciting features. Contact us for any issue that you need to get clarified. We are more than happy to help you.
[b][red]This message was edited by Tim3000 at 2005-7-15 0:21:40[/red][/b][hr]
If you search for files how can you exclude the extensions from the filenames?
with this I get the filenames from current dir so thats fine but I don't want the Extension of the filenames cause then with renaming characters I run into problems ...or is it possible to exclude the last 4 characters of the filenames in the renaming procces ? (so it leaves the Extension unchanged)
anybody any idea ? Thanks a lot!
if FindFirst('*.*', faAnyFile, searchResult) = 0 then
Found := Found + 1;
stringlist := TStringList.Create;
StringReplace(SearchResult.Name, 'DA', 'D3',
[rfReplaceAll, rfIgnoreCase] ))
until FindNext(searchResult) <> 0;