delphi &符号的问题

如果在数据据记录中有&符号的话,写进XML的时候会出现&    Child_Node :=Parent_Node.AddChild('surname');
    Child_Node.Text :=ADOQuery1.fieldbyname('SurName').AsString;    <clk_manifest_row>
        <index>5</index>
        <carrier_no>AE</carrier_no>
        <flight_no>AE1820</flight_no>
        <reservation_no>20080204086937</reservation_no>
        <surname>&amp;CHANG</surname>
        <given_name>LINYU</given_name>
        <passport_no>133225522</passport_no>
        <yob>1964</yob>
        <nationality>TWN</nationality>
        <destination>RMQ</destination>
        <origin>HKG</origin>
        <no_of_luggage>2</no_of_luggage>
        <luggage_tag_no> </luggage_tag_no>
        <luggage_weight>0</luggage_weight>
        <boarding_status>OK</boarding_status>
        <luggage_status>ONB</luggage_status>
        <tax_refund_no></tax_refund_no>
        <tax_refund_datetime></tax_refund_datetime>
    </clk_manifest_row>