Problema SQL

[RaulA]

Código Delphi [-]
if (CheckBoxtexto.Checked) then
begin
  cadena := EditTexto.Text;
  if (CheckNombreProd.Checked and CheckDescrip.Checked) then
  begin
    SQL.Add(' AND (P.NombreDeProducto LIKE :cadena) AND (P.Des LIKE :cadena) OR (P.DescripcionAmp :cadena)');
  end
  else
  if CheckDescrip.Checked then
  begin
    SQL.Add ('AND (P.Des LIKE :cadena) OR (P.DescripcionAmp :cadena)');
  end 
  else 
  if CheckNombreProd.Checked then
  begin
    SQL.Add ('AND (P.NombreDeProducto LIKE :cadena)');
  end
  else
  begin
    SQL.Add ('AND (P.NombreDeProducto LIKE :cadena)');
    SQL.Add ('OR (P.Des LIKE :cadena)');
    SQL.Add ('OR (P.DescripcionAmp :cadena)');
  end;
end;

La variable cadena esta declarada al principio de la funcion :
var
cadena : string;

la cosa esq es una salect y le añado una condicion y cuando entra aqui me da un error de que el tipo de cadena es desconocido y no entiendo porque.

espero que me podais ayudar

gracias