Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.05.2010, 09:31   #1
mrpit
 
Регистрация: 20.05.2010
Сообщений: 4
По умолчанию Loadfromfile и Удаление файла: проблема

Здравствуйте, уважаемые форумчане!
У меня возникла следующая проблема.

В программе необходимо подгружать парсить а затем удалять XML-файл.
Выбрал в качестве компонента TXMLDocument.
Но возникла следующая проблема: после открытия и разбора файл он не удаляется, функция DeleteFile отрабатывает с кодом ошибки 32.
Удалить файл ручками при запущенной программе не удается.
Как же закрывать файл? или удалять объект?

Кусок кода:
Код:
var xmldoc: TXMLDocument;
begin
  xmldoc := TXMLDocument.Create(Form1);
  xmldoc.LoadFromFile(Form1.Edit1.Text);
  xmldoc.Free;
end;
Не судите строго, в рядах разработчиков Дельфи недавно =)
mrpit вне форума Ответить с цитированием
Старый 20.05.2010, 10:26   #2
Z1000000
Форумчанин
 
Регистрация: 04.05.2010
Сообщений: 495
По умолчанию

В TXMLDocument переопределен метод Destroy. Его и используй.

Disposes of a TXMLDocument object.
destructor Destroy; override;
Description
It is not necessary to explicitly free a TXMLDocument component. If the component is created with an Owner, that Owner handles the task of freeing the document. If the component is created without an Owner, it is freed automatically when the reference count on its IXMLDocument interface drops to zero.
Нажми на весы, поставь +
Для благодарностей : WebMoney WMR R252732729948
Z1000000 вне форума Ответить с цитированием
Старый 20.05.2010, 10:37   #3
mrpit
 
Регистрация: 20.05.2010
Сообщений: 4
По умолчанию

Сделал вместо Free вот так:

Код:
var xmldoc: TXMLDocument;
begin
  xmldoc := TXMLDocument.Create(Form1);
  xmldoc.LoadFromFile(Form1.Edit1.Text);
  xmldoc.Destroy;
end;
Все равно не помогло. Файл удалить нельзя.
mrpit вне форума Ответить с цитированием
Старый 21.05.2010, 01:42   #4
mrpit
 
Регистрация: 20.05.2010
Сообщений: 4
По умолчанию

Господа все ещё актуально, I need help!
mrpit вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удаление файла gavrylyuk Microsoft Office Excel 9 26.11.2010 09:03
ClientDataSet.LoadFromFile MAcK Общие вопросы Delphi 5 23.04.2010 00:22
Удаление файла Яр|/||< (^_^) Общие вопросы Delphi 8 18.08.2009 09:05
Удаление из файла Шурик Общие вопросы Delphi 4 30.05.2009 23:08
Не работает AdoTable.LoadFromFile SERG1980 БД в Delphi 0 30.03.2009 16:42