Hallo,
hier ist die Lösung, samt Gruss von Mirilin.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
const
A = '[Anfang]';
B = '[Ende]';
begin
Memo1.SelText := A + Memo1.SelText + B;
end;
Vorraussetzung ist, das Du die gewünschte zeile vorher markierst und dann auf den Button klickst.
Grüsse, Daniel
