Filtro

[[Caral]]

Hola
Yo no se c++, bueno tampoco delphi, pero a ver que hago aqui.

 mod->busemple->Active = True;
 StringGrid1->Cells[0][0] = "CLAVE";
 StringGrid1->Cells[1][0] = "NOMBRE";
 {
  if(mod->busemple->FieldByName("CLAVE_EMPLEADO")->AsString == "%" + Edit1->Text + "%")
  {
   StringGrid1->Cells[0][x] = mod->busemple->FieldByName("CLAVE_EMPLEADO")->AsString;
   StringGrid1->Cells[1][x] = mod->busemple->FieldByName("NOMBRE")->AsString;
   x++;
  }
  
 }

Los parentesis no se como iran
Saludos

[[coso]]

Hola. Los caracteres '%' sirven para hacer un filtro, pero desde SQL. En el codigo que estas poniendo te esta comparando exactamente la cadena '%VALOR%'. Tendrias, o bien hacer una busqueda con el 'where' en una sentencia select

Código Delphi [-]
query1->Active = False;
query1->SQL->Text = "select * from tabla where campo like " + QuotedStr("%" + Edit1->Text + "%");
query1->Active = True;

o bien, segun tu codigo actual, en vez de comparar, usar el Pos(...), que te busca una cadena dentro de otra. Saludos.

[[Lepe]]

Si quieres seguir haciéndolo como hasta ahora, solo cambia esto:

Código Delphi [-]
 if(mod->busemple->FieldByName("CLAVE_EMPLEADO")->AsString == "%" + Edit1->Text + "%")
  {

por... más o menos esto:

Código Delphi [-]
if pos(Edit1->Text->lowercase, mod->busemple->FieldByName("CLAVE_EMPLEADO")->AsString->lowercase) <> 0 then

Básicamente pasar a minúsuculas y usar la función Pos.

Saludos