5
我正在开发跨平台应用程序(用于Windows,Mac等)以及32位和64位机器。 我有很多XML文件,我需要验证他们的XSD。在FireMonkey中针对XSD验证XML文件
在Delphi XE3中有这样做吗?
我已经尝试了DTD验证,但我总是收到“DTD禁止”错误。我也试过很多网站上提到的解决方案来解决这个错误,但我没有成功。
在此先感谢。
下面是我使用的代码...
function TForm2.ValidateXML(const xmlFile : TFileName) : boolean;
var
xmlDoc: TXMLDocument;
begin
result := false;
xmlDoc := TXMLDocument.Create(nil) ;
try
xmlDoc.ParseOptions := [poResolveExternals, poValidateOnParse];
try
xmlDoc.LoadFromFile(xmlFile) ;
xmlDoc.Active := true; //this will validate
result := true;
except
on EX : EDOMParseError do
begin
ShowMessage('Invalid XML: ' + Ex.Message) ;
end;
end;
finally
xmlDoc := nil;
end;
end;
感谢avalaible为response.i试图在上述网站,但似乎还有德尔福没有例子。 –
@ user2531352使用Google - 请参阅我的编辑 – mjn
Thanks.I已使用该功能,但在启动时出现访问冲突。 –