This is off the top of my head, but this is one of those things that show how Mac-centric and not Windows-centric REAL/Xojo has been and still is. Floating Windows don’t float (that is, is always the topmost window and nothing can obscure them) on Windows.
Here’s some code I use to make the current window the topmost window in Windows. Call like this, in the Open event of a Window:
const HWND_TOPMOST = -1
TopWindow(Me.Handle, HWND_TOPMOST)
Sub TopWindow(Handle As Integer, XPos As Integer)
#if TargetWin32 Then
Dim NowAPI As Integer
Soft Declare Function SetWindowPosAPI Lib "user32" Alias "SetWindowPos" (ByVal hWnd As Integer, ByVal hWndInsertAfter As Integer, ByVal x As Integer, ByVal y As Integer, ByVal cx As Integer, ByVal cy As Integer, ByVal wFlags As Integer) As Integer
NowAPI = SetWindowPosAPI(Handle, XPos, 0, 0, 0, 0, SWP_NOSIZE + SWP_NOMOVE)
#endif
End Sub