Главная страница
    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.47 MB
Время: 0.026 c
14-1078768130
ChcngerMan
2004-03-08 20:48
2004.04.04
Компьютерные клубы :)


4-1074854466
kentavr
2004-01-23 13:41
2004.04.04
Helpme please


1-1079425037
Miwa
2004-03-16 11:17
2004.04.04
Неужели и вправду код функции должен поместится в экран?


3-1078213733
Rule
2004-03-02 10:48
2004.04.04
Помогите с Мидасом (DCOM), у меня уже паника начинается %%%%%%%%%


3-1078393275
Турчин
2004-03-04 12:41
2004.04.04
Btrieve и Pervasive





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский