[ecfisa]

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