请问：如何向文本文件中插入一条记录....在线等待，高分相赠

Question

请问如何向系统安装目录下的hosts文件增加一条记录（分不同的类型操作系统进行讨论，如win98,win2000,winme），这条记录的内容是：
“192.168.10.3（这是本机的IP地址）   server”例如：在windows2000 中,hosts文件的路径是C:\WINNT\system32\drivers\etc\hosts 这可以通过API函数getsystemdirectory进行查找的。
接下来怎么打开文件，并向其中增加上面那条记录呀急，帮帮我吧，能实现马上给分！

Answer 1

myFile:TextFile;
begin
    FileName:='C:\WINNT\system32\drivers\etc\hosts ';
    AssignFile(myFile,Filename); //将指针指向文件
    try
      Writeln(myFile,'192.168.10.3（这是本机的IP地址）   server');
    finally
      CloseFile(myFile);//清除指针
    end;
end;

Answer 2

谢谢 haoco(程序员):
可是如何自动搜索不同的OS的安装目录下的hosts文件呢？