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