Sql en el activate del formulario?

[chipsoni]

Necesito que una vez al dia, mi programa compruebe las fechas de todas las entradas de una tabla y si alguna entrada tiene mas de 30 dias y nu determinado estado, necesito que cambiar el estado y poner un campo de esa misma entrada a true.

El tema es que lo hago en el activate del formulario principal y no hace nada, os pego aqui el codigo que he escrito en el activate de la ventana principal. No se si lo que esta mal es el codigo o es que no se puede hace en el activate:

with Query do
begin
with SQL do
begin
DataModule1.tdemanda.Close;
Clear;
DataModule1.tdemanda.Open;
Add('UPDATE tdemanda set tdemanda.estado=3, tdemanda.hecho=1');
Add('WHERE (tdemanda.fecha+30< :fecha) and (tdemanda.estado=1)');
ParamByName('fecha').AsDate:= date();
Execute;
end;
end;