update de Sql no funciona, como hago ?

[edr_tuc]

hola a todos,tengo un pequeño problemita,paso a contarles :
necesito que todas las tareas (tabla tareas ) que tengan vencimiento >= hoy cambien su estado a "vencida " para esto en el form principal puse una consulta con lo siguiente en su propiedad sql:

update tareas
set estado = :b
where fecha_vto >= :a

defini correctamente las propiedades de los parametros (propiedad params de la consulta;puse que eran string y date respectivamente ,etc)

y en el evento onshow del form principal tengo lo siguiente :

procedure TFprincipal.FormShow(Sender: TObject);
var
b:string;
begin
b:='vencida';
a:= now;
actualizacion.Params[0].Asstring:=b;
actualizacion.Params[1].AsDateTime:=a;
actualizacion.ExecSql;

la cuestion es que el sistema corre perfecto pero no me actualiza la tabla tareas que es lo que necesito ,podria alguien darme una mano??
desde ya muchas gracias espero haber sido claro en la explicacion saludos .-