怎样改变Memo中某一行字体或某一行的颜色？

Question

怎样改变Memo中某一行字体或某一行的颜色？怎样在Memo中往某一行的数据后面添加数据？

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Lines.Clear;
  Memo1.Lines.Add('宋体');
  Memo1.Font.Color := clRed;
  Memo1.Font.Style := [fsItalic];
  Memo1.Font.Name := '宋体';
end;

Answer 2

设置Memo的属性：
Memo1.Font.Name//改变字体
Memo1.Font.Charset//设置字符集
Memo1.Font.Color//设置颜色
Memo1.Font.Size//设置大小
Memo1.Font.Style//设置字形

Answer 3

一般都是对整个memo的文本进行操作。我发现memo的属性里面有这样几个方法：
memo1.seltext     
memo1.sellength
memo1.selstart
你看看是不是选择出你需要的文本，然后再设置属性啊。