[fpc-pascal]What does this mean?

[Matt Emson]

Try the following: it's more likely to give you some useful info. Also, you
don't call 'Destroy' directly, 'Free' calls it for you.

 program DomTest3;

 {$MODE OBJFPC}

 uses
   DOM,
   xmlread,
   Classes;

 var
   MyXMLStructure  : TXMLDocument;
   MyFile                  : TFileStream;

 begin
   MyFile := TFileStream.Create('test.xml',fmopenread);
   try
     MyXMLStructure := TXMLDocument.Create;
     try
       ReadXMLFile(MyXMLStructure,MyFile);
     except
         On EXMLReadError do WriteLn('Did not work out well');
         On Exception do writeln(E.Message);
     end;
  finally
    MyFile.Free;
  end;
end.