query1.SQL.text:='select max(cuota) as cuo, min(saldo) as sal from cobranzas where alucurso = '+inttostr(y);
query1.Active:=true;
nro:= query1.fieldbyname('cuo').asinteger;
sa:= query1.fieldbyname('sal').asinteger;
if nro = 2 then
begin
showmessage('es 2');
end;
if sa = 10 then
begin
showmessage('si es 10');
form1.Show;
end;