Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.04;
Скачать: CL | DM;

Вниз

Copyfile RenameFele по маске   Найти похожие ветки 

 
tatar   (2004-03-18 08:40) [0]

Уважаемые мастера. Подскажите как заставить стандартные функции Delphi Copyfile, RenameFele, MoveFile, DeleteFile. Копировать .... задавая маску. Например

RenameFile("C:\test\*.*", "c:\test1\*.txt");


 
MBo ©   (2004-03-18 08:43) [1]

С помощью Findfirst/FindNext


 
tatar   (2004-03-18 08:46) [2]

да, но при переименовании имена файлов придется генерировать самому, может есть какой-нибудь стандартный выход ?


 
MBo ©   (2004-03-18 08:53) [3]

Придется самому.
Альтернатива - только вызов системной команды RENAME.


 
tatar   (2004-03-18 08:56) [4]

>>>>Альтернатива - только вызов системной команды RENAME.

это запуск внешней программы на сколько я понял, если нет просьба разьяснить


 
tatar   (2004-03-18 08:58) [5]

Еще вопрос если пользоваться виндовыми TSHFileOpStruct будет тот-же результат(т.е. только один файл)


 
tatar   (2004-03-18 09:57) [6]

up


 
$tranger ©   (2004-03-18 10:10) [7]

Я нашел другой выход - FileListBox. И с помощью цикла считываешь имена файлов
FOR i:=0 TO FileListBox1.Items.Count DO
begin
OldName:=DirectoryListBox1.Directory + "\" + Files.Items.Strings[i];
NewName:=DirectoryListBox1.Directory + "\" + Имя файла;
RenameFile (OldName, NewName);
end;


 
$tranger ©   (2004-03-18 10:11) [8]

А маску делать через FilterComboBox (оба в Win3.1)


 
tatar   (2004-03-18 10:28) [9]

А без использования компонент (читай паскале) можно?


 
tatar   (2004-03-18 12:30) [10]

up


 
Cobalt ©   (2004-03-18 12:32) [11]

Можно использовать TStringList, или, на худой конец, просто динамический массив.


 
tatar   (2004-03-18 13:43) [12]

а можно пример для лучшего понимания


 
Cobalt ©   (2004-03-18 13:52) [13]

пишите в Дельфи "TStringList" и нажимаете клавишу F1.
Внимательно читаете.


 
tatar   (2004-03-18 14:32) [14]

я знаю что такое TStringList, а вот как это может помочь не продставляю


 
Fay ©   (2004-03-18 14:43) [15]

2tatar   (18.03.04 08:40)  
Тебе уже ответили (MBo).
За время с (18.03.04 08:40) по (18.03.04 14:32) эту задачу можно было решить раз ~100.


 
tatar   (2004-03-18 14:46) [16]

Fay спасибо за ответ :-\



Страницы: 1 вся ветка

Текущий архив: 2004.04.04;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.022 c
1-1079462465
Шнур
2004-03-16 21:41
2004.04.04
Компоненты


6-1075105145
Arsen
2004-01-26 11:19
2004.04.04
Proxy в WebBrowser


3-1078209489
Mdaaa
2004-03-02 09:38
2004.04.04
Paradox без BDE :))))


1-1079088255
Andrey_ck
2004-03-12 13:44
2004.04.04
Иконки файлов


6-1073917961
BillyJeans
2004-01-12 17:32
2004.04.04
Прокси...