Главная страница
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.041 c
3-1078820393
wizz
2004-03-09 11:19
2004.04.04
как передать в переменную результат запроса?


6-1074675048
Behemoth
2004-01-21 11:50
2004.04.04
IdTCPServer - Где лежат IP-адреса клиентов?


6-1074686084
IgoX
2004-01-21 14:54
2004.04.04
ClientSocket1Disconnect


7-1074495889
Прямой
2004-01-19 10:04
2004.04.04
Написать что-то вроде Image Drive


11-1058329802
Александр |
2003-07-16 08:30
2004.04.04
Ресурсы