SiComponents Home Page SiComponents Forums
Here you will be able to get help and share your experience
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

How can I modify triggers in Delphi 5

 
Post new topic   Reply to topic    SiComponents Forums Forum Index -> VCL Scheduling Agent
View previous topic :: View next topic  
Author Message
CarlDippel



Joined: 13 Nov 2003
Posts: 15
Location: LI, NY

PostPosted: Thu Nov 13, 2003 8:07 pm    Post subject: How can I modify triggers in Delphi 5 Reply with quote

I want to programmatically adjust the trigger of a task so it starts daily at sunset. I have a routine: Suntime, that given the latitude, longitude, and date will return the time of sunrise and sunset. Very Happy The code below results in this:

schedule = At #:## PM on MM/DD/YY
next runtime = Never Sad

I want this:

schedule = At #:## PM everyday, starting MM/DD/YYYY
next run time = #:## PM MM/DD/YYYY Smile

What is missing or wrong this this code? Question

Code:
:
:
task.Activate;
task.Triggers.Clear;
with task.Triggers.Add do
  begin
    BeginDate:=Date;
    Enabled:=True;
    StartTime:=Suntime.Sunset;
  end;
task.Deactivate(True);
:
:

Thanks a 1E6! -Carl
Back to top
View user's profile Send private message Send e-mail Visit poster's website
CarlDippel



Joined: 13 Nov 2003
Posts: 15
Location: LI, NY

PostPosted: Sat Nov 22, 2003 6:29 pm    Post subject: After a week I sent this email. Reply with quote

From: Carl Dippel
To: support@sicomponents.com
Sent: Friday, November 21, 2003 5:49 PM
Subject: Scheduling Agent

I'm a registered user. I'm having difficulty creating a trigger to a new task.
I want the task to run at 3:00 AM every day.

My program has this code:
Code:
  task.Triggers.Clear;
  with task.Triggers.Add do
    begin
      Enabled:=True;
      StartTime:=0.125;
      BeginDate:=Date;
      TriggerType:=ttDaily;
      TriggerDetails.Daily.DaysInterval:=2;
      Details:=TriggerDetails;
    end;
  task.Triggers.UpdateTriggers;
  task.Deactivate(True);


This is what is displayed in "Scheduled Tasks"
Quote:
Schedule: At 3:00 AM every day, starting 11/20/03
Next Run Time: never


The task never runs. What am I doing wrong?
I posted this question on the forum with no response.

-- Carl Dippel carl@dippel.us www.dippel.us/carl --
Back to top
View user's profile Send private message Send e-mail Visit poster's website
CarlDippel



Joined: 13 Nov 2003
Posts: 15
Location: LI, NY

PostPosted: Sat Nov 22, 2003 6:36 pm    Post subject: This reply was emailed to me Reply with quote

Quote:
From: Serghei Gaivan
To: Carl Dippel
Cc: Igor Siticov
Sent: Saturday, November 22, 2003 5:00 AM
Subject: Re: Scheduling Agent


Hello,

Sorry for the late response. The problem is caused a bug in saTask.pas. The patched sources will be available at our site soon. In order you code function properly just comment/remove the line:
...
Enabled:=True;
...
that is, remove in your code assignments like TTaskTrigger.Enabled := True;

The fixes we have made in saTask.pas would not require revision your code when you update the Scheduling Agent to the next version.

Best regards,
Serghei Gaivan


YES! I am not as stupid as I thought I was, although I may be as stupid as you think I am. Laughing
Back to top
View user's profile Send private message Send e-mail Visit poster's website
CarlDippel



Joined: 13 Nov 2003
Posts: 15
Location: LI, NY

PostPosted: Sat Dec 13, 2003 2:16 pm    Post subject: How is the bug fix coming? Reply with quote

It's been three weeks Exclamation I was just wondering if there was an hope of getting this bug fix before the new year Question I need the functionally for which I paid. -Carl
Back to top
View user's profile Send private message Send e-mail Visit poster's website
isiticov
Site Admin


Joined: 21 Nov 2002
Posts: 2102

PostPosted: Sat Dec 13, 2003 4:20 pm    Post subject: Reply with quote

You was sent the instructions to fix this bug manually on your side in case of urgent needs and the official update with this bug fix was released at 8th December. And was available to download from our download page. Unfortunately, we had web server full crash yesterday and some sections of our web site is not yet restored. This means that downloading registered versions of products is not working yet. In case you need full setup package with this bug fixed please e-mail us and we will send you it by e-mail if download section won't be restored till then.
let us know about your decision.
Back to top
View user's profile Send private message
CarlDippel



Joined: 13 Nov 2003
Posts: 15
Location: LI, NY

PostPosted: Sat Dec 13, 2003 10:02 pm    Post subject: Sorry about the misunstandering. Reply with quote

Please send me the full setup package by email. to cdippel@optonline.net Very Happy Thanks. -Carl
Back to top
View user's profile Send private message Send e-mail Visit poster's website
isiticov
Site Admin


Joined: 21 Nov 2002
Posts: 2102

PostPosted: Sun Dec 14, 2003 5:32 am    Post subject: Reply with quote

Done
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    SiComponents Forums Forum Index -> VCL Scheduling Agent All times are GMT
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by p h p B B  © 2001, 2005 p h p B B  Group