Einzelnen Beitrag anzeigen

Counter909

Registriert seit: 10. Aug 2006
129 Beiträge
 
#15

Re: Memo/Richedit durchsuchen & kopieren

  Alt 17. Mai 2008, 11:37
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
  Mit Zitat antworten Zitat