Delphi - comparar dos strings

Hola a todos, quiero saber como verificar si un string contiene el contenido de otro string.

Por ejemplo:
str_uno = 'Hola'
str_dos = 'Hola a todos'
str_tres = 'todos'
str_cuatro = 'lo que sea'

En este caso str_dos contiene el str_uno y str_tres, pero no el str_cuatro.

Existe alguna función que realiza esta comparación y me devuelva true o false como resultado?

Desde ya muchas gracias.

<Pos> te da la posición en la que encuentra una cadena dentro de otra :
If pos(str_uno, str_dos) > 0 then ......

Muchas gracias !!!, es exactamente eso lo que necesitaba.