Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-pascal / 2015-05

RTLeventWaitFor Timeout

3 messages · 2 people ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Dimitrios Chr. Ioannidis

Hi all,

As I read that the TEvent is using obsolete functions I switched to RTLEvent. Now the RTLeventWaitFor has a TimeOut parameter declared as longint but in synobjs the INFINITE is Cardinal.

Is there a definition of INFINITE constant somewhere else defined as Cardinal ?

Regards,

Dimitrios Chr. Ioannidis

Reply by email

Michael Van Canneyt
to Dimitrios Chr. Ioannidis
Dimitrios Chr. Ioannidis wrote 5 lines
Hi all, As I read that the TEvent is using obsolete functions I switched to RTLEvent. Now the RTLeventWaitFor has a TimeOut parameter declared as longint but in synobjs the INFINITE is Cardinal.

There is no reason to abandon TEvent ?

Why did you do that ?

Michael.

Reply by email

Dimitrios Chr. Ioannidis
to Michael Van Canneyt
Michael Van Canneyt wrote 11 lines
On Tue, 19 May 2015, Dimitrios Chr. Ioannidis wrote: > Hi all, > > As I read that the TEvent is using obsolete functions I switched to > RTLEvent. Now the RTLeventWaitFor has a TimeOut parameter declared as > longint but in synobjs the INFINITE is Cardinal. There is no reason to abandon TEvent ? Why did you do that ?

As you know, in TEventObject.WaitFor it uses basiceventWaitFor in line Result := TWaitResult(basiceventWaitFor(Timeout, Handle)); and the basiceventWaitFor is marked as 'Obsolete. Don't use' even in 2.6.

Should I revert to use TEvent ? Did I missed something ?

Regards,

Dimitrios Chr. Ioannidis

Reply by email