display picture when shiftkey disabled.

[Siggi]

Dear experts,

Inquiring for your help.

I have the Module DisableShiftKey installed in my database.
To stop the user from holding the shift key on startup to access the database window.
The shift key is turned on/of using the macro's: ByPassKeyOff and ByPassKeyOn.

Macro ByPassKeyOff
Action: Runcode
Function: BypassKey(False)

Macro ByPassKeyOn
Action: Runcode
Function: BypassKey(True)

I created a rectangle in the main form (frmMain) with the same backcolor as the form and no border.
On the properties of the rectangle in the Event tab->OnClick the ByPassKeyOn macro is set.
I would like to add a picture on my main form (frmMain) as well showing either a locked or unlocked lock depending on the Shiftkey being activated or not.

When the shiftkey is locked the locked picture has to be visible, when the shiftkey is unlocked, the unlocked picture has to be visible.
Can any help me out with this one?

Thanks.
Best regards,
Siggi.