Welche Skriptsprache

[-187-]

Hmm jetzt mal ungetest würde ich folgende Routine vorschlagen:

Code:

  for i:=Memo1.Lines.Count-1 downto 0 do
  if Pos('bestimmtes_wort',Memo1.Lines.Strings[i])>0 then
    Memo1.Lines.Delete(i);

Oder suchst du zwingend nach einer Nicht-Delphi Lösung