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