изменение имени файла

[tiger()]

как добавить подстроку в середину имени файла?
например, изменить "abc.dat" на "abc_001.dat"

понял что нужно как-то использовать str.Pos("."), но в рабочую конструкцию не складывается.......

[psycho-coder]

В Билдере должна быть функция ExtractFileName(); Которая получает имя файла.
Следовательно можно сделать как то так

String name, ext;
name = ExtractFileName("FileName.bat");
ext = ExtractFileExt("FileName.bat");
Insert("_001", name, Pos(ext, name)); // Реализовать нумерацию труда не составит
Caption = name;

Но, если у файла двойное расширение (например abs.bat.bat) то он запишет так abs_001.bat.bat

[tiger()]

Сообщение от psycho-coder

В Билдере должна быть функция ExtractFileName(); Которая получает имя файла.
Следовательно можно сделать как то так

String name, ext;
name = ExtractFileName("FileName.bat");
ext = ExtractFileExt("FileName.bat");
Insert("_001", name, Pos(ext, name)); // Реализовать нумерацию труда не составит
Caption = name;

Но, если у файла двойное расширение (например abs.bat.bat) то он запишет так abs_001.bat.bat

так и сделал. спасибо!!