[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.*)

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

[M.A.D.M.A.N.]

Сначала выполняешь рекурсивный поиск файлов по масочке, получаешь список, ну а дальше поехали.
Кста, на сайте есть исходник "Супер копира", можешь его помацать.

P.S. Мисс Эйсид Бёрн

[Bargest]

Либо рекурсивный, либо (что лучше) циклический с очередью (каждую найденную папку кладем в очередь, и поиск делаем циклом "пока очередь не пуста"). Потому что как показывает практика, запуск рекурсивного поиска в C:\ частенько приводит к переполнению стека.

[Acid_Burn123]

Можно поподробнее про циклический поиск или рекурсивный,если можно код с коментариями предоставить))не целиком освоился ещё)))
небольшой Error=)

Код:

A+'\'+'*.scvb'

там вместо

Код:

 '*.scvb*

должно быть

Код:

+B

P.S.да под ником Acid_Burn В Фильме была Анджелина Джоли,Но я далеко не она,хотя бы потому что я ОН=)

[Bargest]

FindFirst, FindNext. Описание в гугле.

[Acid_Burn123]

Большое спасибо,разобрался сам=)тему можно закрывать.