Application.OnMessage alternative

[Elphi]

Hi,

I have a Delphi datamodule which declares an Application.OnMessage event handler. I can't find an OnMessage property in de Lazarus implementation of Forms.TApplication. How should I solve this?

Tia,
Elphi

[Vincent Snijders]

I have no idea. What do you want to do in Application.OnMessage?

[Anonymous]

The datamodule is part of the OpenStreamSecII library demo applications. Windows messages arriving serve as an external source of randomness and feed a Yarrow Pseudo Randum Number Generator entropy accumulator with random data used for reseeding the generator.
It's just a demo, but I don't want to break the author's original intentions.

OnMessage properties of TApplication and or TApplicationEvents aren't supported, so what else can I do?

[Vincent Snijders]

The LCL doesn't support this, simply because this is not portable to other widget sets.

Unless you want to program with winapi, I see no solution.