如何使用Delphi将XML数据加载到数据集中，而不使用第三方组件？

Question

我想在不使用第三方组件的情况下将XML数据（大约25000多条记录）加载到数据集（TQuery，TStored Proc）中。我正在使用Delphi 5，所以我没有TClientDataSet。