[aanil]

Saludos a todos.
Quiero una orientación para lo siguiente.

La historia es que tengo una tabla que tiene varios campos (Escuela, Estudiante, Asignatura, Grado, Sección…..)

Bueno aplico esta consulta:

Seleccione todo de la tabla Centro_Educaltivo.
Donde escuela = “nombre de la escuela”
Ejecute.

// Esto hasta aquí funciona correctamente///

Ahora bien.

De las escuelas anteriormente consultadas, quiero que me filtren los estudiantes que estén cursando matemática del grado X, de la sección Y, pero que también yo puede elegir los que estudian matemática y español, o lo que estudian español y ciencias,
Consultar los estudiantes que estudian matemática y ciencias del grado () y sección ()

Yo estaba haciendo esto utilizando varios checkbox


Grupobox : Asignatura
Español () Matemática () Ciencias ()


Grupobox : Grados
Primero () Segundo () Tercero () Cuarto ()

Grupobox: Secciones

A () B () C()


Muestra del codigo

procedure TForm2.ComboBox1Change(Sender: TObject);
begin
If COMBOBOX1.Text = NOMBRE DEL DISTRITO then begin
DM.ADOQuery1.Close;
DM.ADOQuery1.SQL.Clear;
DM.ADOQuery1.SQL.Add('SELECT * FROM CENTROSEDUC');
DM.ADOQuery1.SQL.Add('Where ESCUELA ='+Quotedstr('EDIT1.TEXT'));
dm.ADOQuery1.Open;
end else

Luego usando Checkbox

begin
If (checkbox1.checked) then begin
Dm. Adoquery1.filter := ‘ asignatura =’ +Quotedster(‘Espanol’));
Dm. Adoquery1.filtered: = true;
End else

Begin
Dm. Adoquery1.filtered: = false;
End,

// Hasta aquí voy bien , luego cuando escribo el siguiente código, ya comienzan los problemas…

If (checkbox2.checked) then begin
Dm. Adoquery1.filter := ‘ grado =’ +Quotedster(‘primero’));
Dm. Adoquery1.filtered: = true;
End else

Begin
Dm. Adoquery1.filtered: = false;
End,


Esto lo he hecho de varias formas y no me sale. Esperando me ayuden.