Ahora no tengo tiempo de hacer la prueba, pero:
Código:
AltaPressupost:=AltaPressupost +1;
query1.sql.Add('update alba set alpres=resupuesto where alalb=:albaran');
query1.parambyname('presupuesto').asinteger:=AltaPressupost;
query1.parambyname('albaran').asinteger:=valorNumerico;
query1.execsql;
Un Saludo.