SiComponents Forums

Hello,

I am having problem in enabling/disabling a task. I am using the folowing code but the changes are not getting saved:

var
Index : Integer;
Task: TTaskItem;
begin
for Index := 0 to Scheduler.Count - 1 do begin
Task := Scheduler.Items[Index];
Task.Activate;
if SetActive then //SetActive is procedure parameter
Task.Flags := Task.Flags + [tfDisabled]
else
Task.Flags := Task.Flags - [tfDisabled];
Task.Save;
end;
end;


Any help will be appreciated.

thanks and regards,
Partha

Do you get any error? May be using instead of will help? How do you see that changes are not saved? Do you make "refresh"?

I tried both

Task.Deactivate(True);
and
Task.Save;

None of them work. I do not get an error but the status is not updated.

I am not displaying it to any control so I do not need a refresh.

This really strange. There is no any "problematic" place in your code.

I do not get an error but the status is not updated.

But where do you "see" this status if you don't display it? Directly in Scheduled Tasks? Then Status column doesn't change on adding Disabled flag, but only Schedule and Next Run coulmns indicates Disabled.

I check directly in windows scheduler. Also with,
Task.EditWorkItem

There is small bug in your source and I can suppose it is the origin of problem. Instead of shall be used Please let us know if this fixes the problem.

Thanks, it solves this.