vfp问题？

请问有什么办法知道，当前正在运行的程序，
并且停止它的运行？（用VFP）

---------------------------------------------------------------

调用API应该可以。
---------------------------------------------------------------

DECLARE INTEGER FindWindow IN WIN32API STRING,STRING
LOCAL cTitle

cTitle='xxxxx系统'

if FindWindow(0,cTitle)<>0
=messagebox("发现xxxx系统",16,"")
return
endif
---------------------------------------------------------------

long handle 好象是这样的。