Unifying API check patterns like: if S_OK <> CheckHR(rd.GetLineNumber( chapter.start_line)) then chapter.start_line := 0;
Unifying API check patterns like: if S_OK <> CheckHR(rd.GetLineNumber( chapter.start_line)) then chapter.start_line := 0;

the-Arioch/Delphi-XmlLite,dheijl/Delphi-XmlLite