请问如何从数据库中读取数据，替换文本型文件中的数据？

Question

文本型文件中，我已经做了标记！<!--replace--> 这样的标记，大家帮忙！
文件不大，几十K。

Answer 1

最土的办法！先搜索文本文件的每行数据如果不是<!--replace-->就把它复制到一个新的文本文件中，如果到了这行就把数据库的值插进去。最后替换一下文件就可以了！

Answer 2

这个不难,用一个TMemo来作：
procedure TForm1.btnReplaceClick(Sender: TObject);
var
  icount:Integer;
  TmpStr:String;
begin
  Memo1.Lines.LoadFromFile('e:\file.txt');
  for icount:=0 to Memo1.Lines.Count-1 do
  begin
    TmpStr:=Memo1.Lines[icount];
    TmpSTr:=StringReplace(TmpStr,'！<!--replace--> ',
                          Table1.FieldByName('AField').AsString,
                          [rfReplaceAll]);
    Memo1.Lines[icount]:=TmpStr;
  end;
  Memo1.Lines.SaveToFile('e:\file.txt');
end;

Answer 3

用上面的
或者用。ini文件