Hola.
Si no te entendí mal, podrías hacer algo así:
Código Delphi
[-]
procedure InsertInREColFil(const str: string; col, fil:Integer; RE: TRichEdit);
var
s: string;
begin
if fil <= RE.Lines.Count then
begin
Dec(fil);
s := RE.Lines[fil];
Insert(str, s, col);
RE.Lines[fil] := s;
end;
end;
Uso:
Código Delphi
[-]
...
begin
InsertInREColFil(Edit1.Text, SpinCol.Value, SpinFil.Value, RichEdit1);
...
Saludos