P
pdjwind
Unregistered / Unconfirmed
GUEST, unregistred user!
我写了个自动定时解析xml文件程序,现在测试异常情况。
例如:有file1.xml,file2.xml,file3.xml,故意把file1.xml写为格式不正确的,程序报异常后退出解析函数,自动导入file2.xml, InBossXMLDoc.DocumentElement为nil,file3.xml又可以正常解析。代码如下:
try
InBossXMLDoc.LoadFromFile(FileName);
except
DisplayMessage(Format('XML文件格式有误!文件名: %s ',[FileName]));
InBossXMLDoc.Active:=False;
exit;
end;//end try
Root :=InBossXMLDoc.DocumentElement;
if Root=nil then exit;
.....
例如:有file1.xml,file2.xml,file3.xml,故意把file1.xml写为格式不正确的,程序报异常后退出解析函数,自动导入file2.xml, InBossXMLDoc.DocumentElement为nil,file3.xml又可以正常解析。代码如下:
try
InBossXMLDoc.LoadFromFile(FileName);
except
DisplayMessage(Format('XML文件格式有误!文件名: %s ',[FileName]));
InBossXMLDoc.Active:=False;
exit;
end;//end try
Root :=InBossXMLDoc.DocumentElement;
if Root=nil then exit;
.....