********************************************************************
*  Description.......: Startup program for Visual FoxPro
*  Calling Samples...: 
*  Parameter List....: 
*  Created by........:  
*  Modified by.......: Nadya Nosonovsky 04/01/2000 06:14:11 PM
********************************************************************
local lcPath
lcPath=set('path')
set path to (home()+iif(!empty(lcPath),', '+lcPath,''))
if not "FOXTOOLS.FLL" $ upper(set("library"))
     set library to home()+'Foxtools.fll' additive
endif
on key label F7 do home()+'InsertDesc.prg'
on key label f3 keyboard 'Nadya Nosonovsky '+ttoc(datetime()) plain
on key label f9 _cliptext=mhHTML(_cliptext)