|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Помощь с программой
Здравствуйте!
Помогите написать прогу чтобы она считывала пути из файла (к примеру F:\Фильмы\ и F:\$Recycle.Bin\ Сам файл http://ifolder.ru/10038496 )И потом туда копировала другой файл. Заранее огромное спасибо! |
#2
|
|||
|
|||
Непонял куда тебе надо копировать другой файл?
Я ни в чем никогда не уверен... И в этом тоже... Последний раз редактировалось Interface, 16.01.2009 в 07:42. |
#3
|
|||
|
|||
Другой файл надо копировать в те места, пити которые написаны уже в имеющимся файле (http://ifolder.ru/10038496) Там могут быть разные пути, надо штобы прога все их считала и скопировала в них тот другой файл.
|
#4
|
|||
|
|||
А что собственно не получается? Читаешь http://www.delphisources.ru/pages/fa...opy_files.html Затем загружаешь файл с путями. Дальше все понятно... (вроде)
Я ни в чем никогда не уверен... И в этом тоже... |
#5
|
|||
|
|||
Не понятно как из файла с путями выдрать эти самые пути и скопировать по ним файл. Может приведёшь примерный код.
|
#6
|
|||
|
|||
Пишет ошибку: Компиляция
[Ошибка] Unit1.pas(36): Incompatible types: 'String' and 'PAnsiChar' [Фатальная Ошибка] Project1.dpr(5): Could not compile used unit 'Unit1.pas' Код:
var Form1: TForm1; Fail:TextFile; dir:string; begin AssignFile(Fail,'DCPlusPlus.xml'); Reset(Fail); try while not Eof(Fail) do begin Readln(Fail,dir); CopyFile('F:\Фильмы\',dir,false); end; finally CloseFile(Fail); end; end; Мне кажется что вы не совсем поняли, мне надо в файле DCPlusPlus.xml найти строки пути, там они в таком виде: <Share> <Directory Virtual="Фильмы">F:\Фильмы\</Directory> <Directory Virtual="_Recycle.Bin">F:\$Recycle.Bin\</Directory> </Share> Но могут быть и другие, надо чтобы указанный мною файл был скопирован в F:\Фильмы\ и F:\$Recycle.Bin\ ,но это тока в этом случае, если другой DCPlusPlus.xml то соответственно пути будут другие. Последний раз редактировалось Admin, 16.01.2009 в 14:34. |
#7
|
|||
|
|||
Так как работу с текстом плохо знаю... Могу посоветовать только стирать нужное колво символов из строки...
Код:
Unit1.pas(36): Incompatible types: 'String' and 'PAnsiChar' Я ни в чем никогда не уверен... И в этом тоже... |
#8
|
|||
|
|||
[quote=neo4511]Пишет ошибку: Компиляция
[Ошибка] Unit1.pas(36): Incompatible types: 'String' and 'PAnsiChar' [Фатальная Ошибка] Project1.dpr(5): Could not compile used unit 'Unit1.pas' Ты читаешь из файла в переменную типа String, а для копирования используется тип PAnsiChar. Для того, чтобы реализовать выдерание путей из файла ищи с начала и доконца, и сравнивай есть ли " и что там дальше идёт. |
#9
|
||||
|
||||
Можно сделать двумя способами-парсинг DCPlusPlus.xml как xml-документ или как текст, если разбираться не охота. вот тут много примеров работы с xml: http://www.delphisources.ru/cgi-bin/...ml&stpos=0&s=R
РГРТУ - ФВТ - Системы Автоматизированного ПРоектирования. ت |