die position kann ich dann ja so erhalten:
Delphi-Quellcode:
for Index := Memo2.Lines.Count - 1 downto 0 do
begin
Position := Pos(form1.Edit1.Text, Memo2.Lines[Index]);
if Position > 0 then showmessage('+inttostr(position)+''
end;
so dann hab ich ja mein Feld wo ich eingeben kann, wieviele Zeilen kopiert werden sollen, also
n:=edit1.text
logischerweise um kann ich dann doch "position+n", sodass ich die endzeile habe, bis wo kopiert werden soll, aber
copy(memo2.Lines.Text,?,??);}
aber hier werden ja nur nur die "Pos" werte verlangt und keine zeile