*-- See if Form1 is running to prevent a 2nd instance of the form.
llFormIsRunning = .F.
FOR Each loForm in _Screen.Forms FoxObject
If Upper(loForm.Name) == "FORM1"
llFormIsRunning = .T.
If NOT llFormIsRunning
Do form Form1...
*-- Do the same for the 2nd Form before opening it.