Checking TOP status of a window

[larrybtoys]

Is there a way to check the visibility status of a window? I have a program that allows the user to open a second smaller window with some program information in it however sometimes users will click on the larger original window by accident covering up the smaller window. The program can't go on until they click the DONE button on the smaller window however they can't see it as the larger window is covering it up. I need to be able to check to see if this smaller window is on top and if not put it on top.

[dragonjim]

Does this help?

OpenW 1
Win_1.Enabled = False
OpenW Top 2, 200, 200, 200, 200
Ocx Command cmd = "Done", 10, 10, 100, 15
Do : Sleep : Until Win_1 Is Nothing

Sub cmd_Click
 CloseW 2
 Win_1.Enabled = True
 Win_1.SetFocus
End Sub

[larrybtoys]

Yes...Thank you. I simply put these 3 lines just before I scanned for an input to ensure my new smaller window (#3) was the one they were clicking on.

If Win_3.SetFocus = False
Win_3.SetFocus
EndIf

Seems to do exactly what I need it to do.

[(X)]

Polling the focus state of your form is an definite solution.

There a few other methods related to your desired form behaviour: <form>.OnTop, <form>.ToBack, <form>.ToTop and <form>.Zorder all have some special cases where they may contribute to the behaviour you desire.

From Help Doc...

The ToTop and ToBack methods use the SetWindowPos function to change
the Z order of Form. Child, pop-up, and top-level windows are ordered
according to their appearance on the screen. The topmost window receives
the highest rank and is the first window in the Z order. If a Form
identifies a topmost window, with ToBack the window loses its topmost
status and is placed at the bottom of all other windows.

The OnTop property sets the topmost state of a window. OnTop places the
window above all non-topmost windows. The window maintains its topmost
position even when it is deactivated; using the ToTop method does NOT
set the corresponding OnTop property to True.

ZOrder Method
Purpose
Places a specified Form, or Ocx control at the front or back of the z-order within its graphical level.

Syntax
object.ZOrder [position = 0]

object:Ocx Object
position:iexp

Description
The position parameter is optional, it indicates the position of object relative to other instances of the same object. If position is 0 or omitted, object is positioned at the front of the z-order. If position is 1, object is positioned at the back of the z-order.