救命啊：delphi一点点问题。

Question

我导入一个关键词列表
如:
WODKSL
DFDDFDF
DFDFSD
DSFFDSDFS
FDSDSF
DSFDFS
FDSDSF
怎么样输入为：<a href="/ddd-k-WODKSL.html">WODKSL</a>
求救，如何实现。最好能提供代码。谢谢。

Answer 1

创建两个MEMO， 一个按钮。 
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
  s: string;
begin
  for i := 0 to memo1.Lines.Count-1 do
  begin
    s := Memo1.Lines[i];
    Memo2.Lines.Add(Format('<a href="/ddd-k-%s.html">%s</a>',[s,s]));
  end;
end;