Código Delphi [-] if Pos('palabra', 'palabra en una frase') <> 0 then ...
if Pos('palabra', 'palabra en una frase') <> 0 then ...