query1.SQL.Clear;
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;
if nro = 2 then
begin
showmessage('es 2');
end;
query1.Active:=False;
query1.SQL.ADD(' and cuota = '+inttostr(nro));
query1.Active:=true;
sa:=query1.fieldbyname('sal').asinteger;
if sa = 10 then
begin
showmessage('si es 10');
form1.Show;
end;