怎么使数据库中某字段内容全部读到xml中？

procedure TFHelpConfig.FormShow(Sender: TObject);
var Stream:TMemoryStream;
begin
try
try
with ADOQuery2 do
begin
Close;
SQL.Clear;
SQL.Add('select top 1 * from AceHelpIni Order by ModifyTime');
Open;
end;

Stream := TMemoryStream.Create;
TBlobField(ADOQuery2.FieldByName('Ini')).SaveToStream(Stream);
Stream.Position := 0;
Stream.SaveToFile('D:\aa.xml');
finally
Stream.Free;
end;

self.ADOQuery1.LoadfromFile('D:\aa.xml');
except
ShowMessage('出错！');
end;
end;

我数据库中Ini的内容为
<xml xmlns:s='uuid:BDC6E3F0-6DA3-11d1-A2A3-00AA00C14882'
xmlns:dt='uuid:C2F41010-65B3-11d1-A29F-00AA00C14882'
xmlns:rs='urn:schemas-microsoft-com:rowset'
xmlns:z='#RowsetSchema'>
<s:Schema id='RowsetSchema'>
<s:ElementType name='row' content='eltOnly' rs:updatable='true'>
<s:AttributeType name='id' rs:number='1' rs:writeunknown='true' rs:basecatalog='AceStylePlatform' rs:basetable='AceHelpConfig'
rs:basecolumn='id'>
<s:datatype dt:type='int' dt:maxLength='4' rs:precision='10' rs