Hi All

 

How can I prevent a form from reopening if it is already open.

I have tried putting the following code in the init but a, it already
has a caption property in the init so finds it the first time and b, it
carries on and runs the form regardless.

 

Local lnCount As Number,lcRunningForm As Character

For lnCount = 1 To _Screen.FormCount

      lcRunningForm = _Screen.Forms(lnCount).Caption

      If lcRunningForm = "Authorisation Form"

            Return .F.

      EndIf

EndFor

 

T.I.A.

 

Peter Hart

Peter Hart Computers

 



--- StripMime Report -- processed MIME parts ---
multipart/alternative
  text/plain (text body -- kept)
  text/html
---

_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/a57fa4cf19531343a2ee11b57db8e3af04c...@server.peterhartcomputers.local
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to