Código Delphi [-]if Pos('Lo que busco', Memo1.Text) > 0 then ShowMessage('Pues mira que si esta');
if Pos('Lo que busco', Memo1.Text) > 0 then ShowMessage('Pues mira que si esta');