Уважаемые господа!

У меня почему-то не хочет работать функция CopyFile (код прилагается)
Напишите пожалуйста в чём дело. Заранее благодарен за ответ.
for (index = 1;index <= IntToStr(NMPOP31->MailCount);index++)
{
tempdir = NMPOP31->AttachFilePath;
SetCurrentDir(tempdir);
CreateDir(GetCurrentDir() + "\\Temp");
NMPOP31->AttachFilePath = GetCurrentDir() + "\\Temp";
NMPOP31->GetMailMessage(index);
attachment = NMPOP31->MailMessage->Attachments->Text;
SetCurrentDir(GetCurrentDir() + "\\Temp");
oldfilename = GetCurrentDir() + "\\" + attachment;
newfilename = tempdir + "\\"+ attachment;
CopyFile(oldfilename.c_str(),newfilename.c_str(),false);
Edit5->Text = oldfilename.c_str();
Edit6->Text = newfilename.c_str();
//CopyFile("text.tmp","..\\text.tmp",false); - это работает!!!
DeleteFile(oldfilename);
SetCurrentDir(tempdir);
RemoveDir("Temp");
fwrite(attachment.c_str(),strlen(attachment.c_str()),1,base);
NMPOP31->AttachFilePath = tempdir;
}

Возвращает 123 - Invalid file name

но у меня имена файлов в тестовых целях загосятся в Edit'ы - и там в се правильно

C:\Base\Temp\text_1.tmp - oldfilename
C:\Base\text_1.tmp - newfilename

Нет не наоборот

Из папки Temp файлы перекидываются в вышестоящую папку