Firemonkey TEdit is not blinking before execute Application.run

  

I’m trying to create an application with login form based on this example: http://delphi.about.com/od/windowsshellapi/a/password_login.htm

The example above works fine on VCL

In Firemonkey, if I show the login form before call Application.Run the cursor of TEdit don’t blink. If I show the login form and also call Application.Run, it blinks normally.

Can I do something to make the cursor blink before call Application.Run?

Comments are closed.