关于数据库数据转XML格式的文件

关于数据库数据转XML格式的文件求助
我现在用TXMLDocument控件来把数据库里的数据转成XML格式，已经成功了，但是发现前面多了一行数据，如下：

<?xml version="1.0"?>

-<userdata>
    -<data>
        <customerNo>110000111</customerNo>
    </data>
</userdata>

第一行的数据是自动生成的，我想请教一下这个有没有办法去掉？

如果没办法去掉，那能不能用类似于写自定义文件一样来生成xml文件，我试了以下方式，但是生成的文件是空的：

function TForm1.ReplaceString(AString: string): string;
begin
    Result := StringReplace(AString, '&', '&amp;', [rfReplaceAll]);
    Result := StringReplace(Result, '>', '&gt;', [rfReplaceAll]);
    Result := StringReplace(Result, '<', '&lt;', [rfReplaceAll]);
end;

procedure TForm1.SaveToXml;
var
    f: TextFile;
    PathName: String;
    Str: String;
begin
    PathName := 'D:\text.xml';
    AssignFile(F, PathName);
    Str := ReplaceString('<userdata>');
    Str := Str+#13#10;
    if not FileExists(PathName) then
    begin
        ReWrite(F);
       Write(F,Str);
   end;

    CloseFile(F);
end;

------解决方案--------------------
前面一行，是XML版本、字符类型等信息，不可以删除。读取XML时，无碍的。这是XML格式约定。