Re: milliseconds and delay until

[Jano <nono@celes.unizar.es>]

Thomas Bruns dice...
> Hello
> 
> how can I handle the until delay statement, too do this: ????
> 
> 
> with ADA.Calendar; use ADA.Calendar;
> 
> procedure ....
> 
> MS : INTEGER; --milliseconds
> 
> begin
> MS:= INTEGER(FLOAT(seconds(clock)) * 1000);
> 
> MS := MS + 100;
> 
> delay until MS; ---???? it is wrong :-( it must be a time type :-( but I
>         -- need the clock from a fixed time and add some milliseconds... 
> --and then the until delay statement....How can I handle this???

Why not use better a Time type from start?

Next : Time := Clock;

Next := Next + 0.1;

delay until Next;

-- 
-------------------------
Jano
402450.at.cepsz.unizar.es
-------------------------