Форум программистов, компьютерный форум CyberForum.ru Форум программистов | Компьютерный форум | Форум web-программистов | Форум по электронике и бытовой технике | Форум о софте | Научный форум | Карьера и бизнес
CyberForum.ru - форум программистов и сисадминов > Форум Форум программистов > Форум Pascal (Паскаль)
Восстановить пароль Регистрация

Ответ Создать новую тему
 
12.10.2008, 17:08   #1
L@m@kЪ
Гость
Сообщений: n/a
Как копировать и перемещать файлы / Pascal (Паскаль)

Доброго времени суток всем!
Подскажите, как реализовать вот такую муть:чтобы при запуске программы указанный в ней файл перемещался или копировался в другое место\папку, например
из C:\folder\sound.wav в D:\sound.wav или же с флэшки на винт.Помогите,кто чем может плиз!
12.10.2008, 17:08
AdAgent
Объявления
12.10.2008, 18:31   #2
Vovan-VE
Форумчанин
Регистрация: 10.01.2008
Сообщений: 15,063
Репутация: 12936 (6322)
Лучшие ответы: 143
Как копировать и перемещать файлы

Насколько я помню, в паскале нет встроенных функций для копирования и перемещения файлов. Можно без проблем написать свои функции.
Другие темы раздела
Pascal Составить из двух одномерных таблиц третью, в которой элементы упорядоченны по возрастанию
Вот собственно и задачи: 1. Составить из двух одномерных таблиц третью,в которой элементы упорядрченны по возрастанию. 2. Дан одномерный массив из целых чисел,вывести все элементы этого массива,которые находятся между максимальным и минимальным. Каждая программа отдельно. Желательно пузырьком....
Найти все числа из массива B, встречающиеся более чем в одной строке матрицы A Pascal
Помогите решить задачку в Pascal, заранее спасибо! Найти все числа из массива B(n), встречающиеся более чем в одной строке матрицы A(m,n).
12.10.2008, 21:21   #3
L@m@kЪ
Гость
Сообщений: n/a
Как копировать и перемещать файлы

Спасибо, конечно за ответ, но я только начал изучать паскаль, не могли бы вы поподробней разъяснить, как создать эту процедуру?
13.10.2008, 07:59   #4
Evklid
Форумчанин
Регистрация: 13.03.2008
Сообщений: 81
Репутация: 24 (19)
Лучшие ответы: 2
Как копировать и перемещать файлы

Вот код программы, осуществляющей перемещение файла, на вход которой подается полное имя перемещаемого файла и новая директория.
Код Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
{$M 2048, 0, 0} {устанавливаем размер стека}
program cutfile;
uses
 DOS; {подключаем модуль DOS}
var
 path: PathStr;{полное имя исходного файла}
 dir_new: DirStr;{директория куда копируется файл}
begin
 write('Vvedite polnoe im9 kopiruemogo faila: ');
 readln(path); {считываем полное имя}
 write('Vvedite directoriu, v kotoruiu nado ckopirovat'' fail: ');
 readln(dir_new);{считываем директорию}
 swapvectors;{обмениваем содержимое векторов прерывания с переменными SAVEINTXX} 
 exec('C:\WINDOWS\system32\cmd.exe','/C attrib -h -r -a ' + path);{снимаем атрибуты файла (скрытые/системные и только для чтения)}
 exec('C:\WINDOWS\system32\cmd.exe','/C copy '+ path+ ' '+ dir_new);
{запускаем cmd.exe и передаем ему параметры: команду копировать+имя файла+новая директория}
 exec('C:\WINDOWS\system32\cmd.exe','/C del '+ path);{запускаем cmd.exe с командой удаления и путем к первичному файлу} 
 swapvectors;
 readln;
end.
ЗЫ Если убрать строку
Код Code
1
exec('C:\WINDOWS\system32\cmd.exe','/C del '+ path);
, то получится программа не перемещающая, а копирующая файлы. конечно если вы только начали изучать Паскаль авм будет непросто разобраться в этой программе, точнее надо будет почитать про прерывания, программные.
13.10.2008, 07:59
AdAgent
Объявления
13.10.2008, 09:32   #5
L@m@kЪ
Гость
Сообщений: n/a
Как копировать и перемещать файлы

Спасибо за код! Насколько я понял, здесь операция копирования\перемещения осуществляется через интерпретатор cmd.exe ,просто надо указать необходимые параметры и ключи?
ЗЫ:Сам бы не додумался, спасиба! =)
13.10.2008, 13:22   #6
L@m@kЪ
Гость
Сообщений: n/a
Как копировать и перемещать файлы / Pascal (Паскаль)

А как создавать свои процедуры и функции? Отличается ли asm в pascale от обычного?
13.10.2008, 13:22
Yandex
Объявления
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать новую тему

Похожие темы
Тема Раздел Автор Дата
Не могу открыть, копировать и перемещать файлы на флэшке - Лечение компьютерных вирусов
пишет доступ закрыт администратором
Лечение компьютерных вирусов krvnk 05.10.2013 20:19
Bash: Как копировать файлы на FTP?
Код должен копировать файлы на фтп, но это не происходит. где здесь ошибка? cd /home/c/cl125524/public_html/tmp/orders/ for filename in $(ls); do ftp -in <<EOF open 12.345.67.89 user anonymous a cd /incoming/New_server/Share/orders/ bin
Shell, Bash devenge 03.05.2012 12:36
C++: <fstream> как копировать файлы?
Какой функцией можно скопировать нужный файл?
С++ для начинающих Gepar 22.06.2011 16:41
C++ Builder: Как копировать файлы?
Как копировать файлы с одного места в другое?
C++ Builder Vladant 19.11.2010 22:26
Windows 7: как скрыто копировать файлы
Такая проблема есть файлы на жестком, нужно их скопировать но не использую проводник или тотал командер, подскажите как правильно копирнуть через cmd (командную строку) или еще как-нибудь не заходя в саму папку. Система винд 7
Windows 7 КРОН 15.05.2010 20:43
Опции темы

Текущее время: 01:33. Часовой пояс GMT +4.

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2014, vBulletin Solutions, Inc.