[Decoding]

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
   Memo1.Lines.Strings[0] := Memo1.Lines.Strings[0] + 'some text';
end;

Вместо 0 поставь номер нужной строки…