Копирование файлов

[xAVATARx]

Мне нужно скопировать файл, но так, чтобы вручную (или по алгоритму) задать ему новое имя. Суть в том что во время работы программы заполняеться база данных, и в конце работы я хочу прост копировать файл БД,а тот, с которым работал очищается (это у меня уже готово)... и нужно чтобы имена соответствовали дате копирования. поэтому обычный код наподобии CopyFile('C:\1.txt', 'D:\1.txt', true); не подходит.

[BDA]

Почему же не подходит? Вполне подходит. Просто имя нужно задать с помощью datetimetostring (delphibasics.ru/DateTimeToString.php).

[xAVATARx]

А как я потом переменную сделаю именем ? там же нужно путь указать...или мои источники врут ? плиз, сделай пример как это будет выглядеть чтобы у меня не осталось вопросов....

[Пепел Феникса]

путь есть строка.

[denisbrain]

Сообщение от Пепел Феникса

путь есть строка.

// замена символа ch1 на  символ ch2 
// для замены точки на "_"
Function TextConvertChar(value:string;ch1:char;ch2:char):string;
var x,l:integer;
    s2:string;
begin
   s2:='';
   l:=length(value);
   for X:=1 to l do if value[x]=ch1 then s2:=s2+ch2 else s2:=s2+value[x];
   result:=s2;
end;


CopyFile('C:\1.txt', 'c:\'+TextConvertChar(DateTostr(Date),'.','_')+'.txt', true);

[BDA]

var
s:string;
begin
datetimetostring(s,'dd-mm-yyyy',now);
CopyFile('C:\1.txt', 'c:\'+s+'.txt', true);