I have these little cursor shaped forms that I need to be on Top of everything, all the time... FormStyle is already fsStayOnTop I use this cod
FormStyle
fsStayOnTop
or instead of the SetWindowPos command - try this:
if visible then form1.SetFocus;