Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Deactivating a form
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00348242
Message ID:
00348340
Vues:
27
Chris,

Try this function:

function release_window(lcp_WindowName)
* Release a specific window.
local ll_window_found
local ln_i
local lo_cur_form
ll_window_found = .f.
for ln_i = 1 to _screen.formcount
lo_cur_form = _screen.forms(ln_i)
if upper(lo_cur_form.name) = upper(lcp_WindowName)
ll_window_found = .t.
exit
endif
endfor
if ll_window_found
lo_cur_form.release
endif
return ll_window_found

Sample syntax:
=release_window('frmMyWindow')

Regards,
Tony Marelich
http://www.sqlavenue.com

>Hi all
>
>I've been calling a form (called PROGRESS) from within a programme of mine, and I would like to kill only this form at the end of the programme. I've been using DEACTIVATE WINDOW ALL - but this kills all the FORMS - is there any way to only kill a specific form similar to the "THISFORM.RELEASE" command used within the actual form???
>
>Thanks in anticipation...
>
>Regards
>
>Chris Kable
>FuelTrac
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform