[fpc-pascal] ActiveFormHandle from TApplication

[Paul Ishenin]

21.01.2010 19:50, Justin Smyth wrote:
> Any one know how to get the Active Handle from the current Form from 
> TApplication ? Delphi has something for this but i cant see it.
> I'm in the progress of getting JVCL working under FPC / lazarus ( FPC 
> 2.5.1 & Lazarus Win64 V 0.9.29 )
> I suspect i might need to make a property to read the TList of 
> FFormList and check on each form to out if its the active form. ( not 
> sure about this part ).
You are searching the wrong object. Look at TScreen.ActiveForm / 
TScreen.ActiveCustomForm (as I remember).

Best regards,
Paul Ishenin.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20100121/fa4bdcd6/attachment.html>