[Acid_Burn123]

Здравствуйте,помогите с написанием кода который бы выполнял примерно такую функцию:
MoveFile(C:\*.txt),(D:\)
Знаю что без нового имени(D:\'Новое имя перемещаемого файла')нельзя,подскажите как обойти или все же можно зделать так????

мой кодстоит на клике по буттону)

Код:

begin
A:=GetSpecialFolderPath(CSIDL_DESKTOPDIRECTORY);
directory:=A;
ChDir(directory);
GetDir(2, directory);
Createdir(edit1.text);
createdir(edit2.text);
name:=edit1.Text;
name2:=A+edit2.Text;
C:=A;
B:='*.scvb';
MoveFile(pansichar(A+'\'+'*.scvb'),pansichar(A+'\'+name+'\'));
end;

Все переменные string'овые))Думаю не получается потому что у MoveFile нету свойства, типа задания по маске(типа *.txt или *.jpg или 123.*)

Помогите пожалуст))) //желательно с комментариями к коду(чтоб понятней было..)))