Spezielle Memo Text suche?

[Bummi]

vielleicht kannst Du mit dem Ansatz etwas anfangen:

Delphi-Quellcode:

const
 ALL= 'ATEXTBTEXTCTEXT';
 A='atext';
 c='Ctext';
begin
   Showmessage(StringReplace(
               StringReplace(ALL,a,'',[rfReplaceAll,rfIgnoreCase])
               ,c,'',[rfReplaceAll,rfIgnoreCase])
               );
end;