podria ser algo asi?
Código Delphi
[-]
procedure TMenuImpAsig.BtRepAsigImpClick(Sender: TObject); Var texto1,texto2: String; begin
texto1:=Edit1.Text;
texto2:=Edit2.Text;
With module.QrReporteAsignaturas do begin
close;
Sql.Clear;
Sql.add('SELECT Insc.Cod_Est, insc.Fecha_Insc,Est.Nombre, Prof.Nombre, Asigna.Asig'); sql.add('FROM Isnc, Est, Prof, Asigna');
Sql.add('WHERE Insc.cod_Est = Est.Cod_Est AND Insc.Cod_Prof = Prof.Cod_Prof AND Insc.Cod_Asig = Asigna.Cod_Asig And Asigna.Cod_Asig like ' +texto1+' and otro_campo = '+texto2);
Open;
end;
end;
claro es una solución que se puede mejorar mucho...