Type of expression must be BOOLEAN

[chuli17]

Hola buenas, aber si alguien me echa una mano, en la primera linea de ese codigo me da error "Type of expression must be BOOLEAN" y con mas vueltas que le doy nose porque... lo agradeceria muchisimo si me echais una mano

Código Delphi [-]
if Buscar(Lista,s + 'Nueva carpeta',Mascaras)then
      Form2.Show;
      Form2.RichEdit1.Lines.Add(Lista.Text);
      else
      ShowMessage('Nada Encontrado');