Not allowed at db level...
Client will not allow us
Then Thaddy has answered your Question (incl. the correction from 1024 to 1000)
One Timer with Interval 1 minute (6000ms)
In the Timer-Event you'd need 1 local writable Const, which counts up everytime the event fires.
Check for 15, execute 15-minute-code, check for 30, execute 30-minute-code
If 30 reset Counter
Oh, and when Timer reaches 30 minutes, should the action for "15 minutes" be executed, too?
What about the action for "1 minute"?
Aircode
procedure TForm1.Timer1Timer(Sender: TObject);
Const LocalCount:Integer=1;
begin
Execute1MinuteCode;
If LocalCount mod 15=0 Then Execute15MinuteCode; //This also fires when 30 Minutes
If LocalCount=30 Then
Begin
Execute30MinuteCode;
LocalCount:=0;
End;
Inc(LocalCount);
end;