Форум: "Основная";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
ВнизXML Найти похожие ветки
← →
Андре_ (2002-04-01 09:44) [0]Подскажите пожалуйста.
Есть следующий код:
......
type TODBCConfigReader = class(TObject)
XML: TXMLDocument;
private
Provider : string;
PSI : string;
UserID : string;
DS : string;
IC : string;
ConnStr : string;
public
FileName : string;
procedure GetInfo;
end;
......
procedure TODBCConfigReader.GetInfo;
begin
XML:=TXMLDocument.Create(nil);
XML.LoadFromFile("c:\dta.xml");
Provider:=XML.DocumentElement.ChildNodes["Provider"].Text; (!!)
PSI:=XML.DocumentElement.ChildNodes["PersistSecurityInfo"].Text; (!!)
UserID:=XML.DocumentElement.ChildNodes["UserID"].Text; (!!)
DS:=XML.DocumentElement.ChildNodes["DataSource"].Text; (!!)
IC:=XML.DocumentElement.ChildNodes["InitialCatalog"].Text; (!!)
ConnStr:="Provider="+Provider+";"+
"Persist Security Info"+PSI+";"+
"User ID="+UserID+";"+
"Data Source="+DS+";"+
"Initial Catalog="+IC;
end;
......
В строках помеченных (!!) во время выполнения программы возникает ошибка. Хотя документ загружается корректно. Смотрел свойство XML.xml - все в порядке.
Если расположить TXMLDocument на форме, а не создавать динамически, то этот код работает корректно.
В чем может быть дело ?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c