关于tmemo控件中的字符串的问题

[lyq111]

如何对控件tmemo中的字符串进行控制
比如说：我要在memo1.lines[1]中第三个字符位置输入某个数

[luckjackie]

memo1.lines[0]:=Copy(memo1.lines[0],1,3)+edit1.text+Copy(memo1.lines[0],3,maxint);

[王集鹄]

procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.CaretPos := Point(3, 1);
Memo1.SelText := 'Delphi6调试通过';
end;

[dreamfan]

selstart

[netlib]

memo1.lines[i]:=Copy(memo1.lines[i],1,3)+edit1.text+Copy(memo1.lines[i],3,maxint);