agregar una linea en la primera fila de un memo

[ingabraham]

agrego varias lineas a un memo
memo1.add.lines(strlinea1)
memo1.add.lines(strlinea2)
memo1.add.lines(strlinea3)
...


ahora, quiero reescribir en la primera linea del memo
o agregar una linea en la primera fila del memo.

como hago.

[ecfisa]

Hola ingabraham.

Para insertar podés usar la función Insert, donde el primer parámetro es el
número de línea donde harás la inserción y el segundo la cadena de caracteres a insertar.

Ejemplo:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Lines.Add('LINEA 1');
  Memo1.Lines.Add('LINEA 2');
  Memo1.Lines.Insert(0,'LINEA INSERTADA')
end;

Para sobreescribir:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Lines.Add('LINEA 1');
  Memo1.Lines.Add('LINEA 2');
  Memo1.Lines[0]:= 'LINEA SOBREESCRITA';
end;

Donde el índice es el número de línea a sobreescribir ( en el ejemplo: 0)

Saludos