Laurie Alvey wrote:
Years ago I used something in intellisense (at least, I think was in
intellisense) to automatically insert a comment block at the beginning of
a program or procedure. As I have changed computers and reinstalled VFP a
few times (fatal crashes), I have lost whatever I did and can't remember
how it was done.
Can anyone help?
I do this in intellisense manager by creating a custom script, which I
then call by typing fh<space> (for function header - obviously you could
do the same with program header) Here is the script I wrote - feel free
to copy and modify:
LPARAMETERS oFoxcode
LOCAL cFunName, cParmList, cParmStatement
IF oFoxcode.Location = 0
RETURN "header"
ENDIF
oFoxcode.valuetype = "V"
cFunName = InputBox("Function Name?", "Enter Function Name",
"Function_Name")
cParmList = InputBox("Parameters?", "Enter Optional parameter(s)", "")
IF !Empty(cparmList)
cParmStatement = "LPARAMETERS " + cParmList
else
cParmStatement = ""
endif
TEXT TO lcHeader TEXTMERGE NOSHOW
**********************************************************************
* Function...: <<cFunName>>
* Author.....: Vincent Teachout
* Date.......: <<mdy(date()) >>, <<time() >>
* Notice.....: Copyright © <<TRANSFORM(Year(date()) ) >>, Caracal Software.
* ...........: All Rights Reserved.
* Purpose....: ~
* Parameters.: <<cParmList>>
* Returns....:
* Compiler...: <<version() >>
**********************************************************************
FUNCTION <<cFunName>>
<<cParmStatement>>
RETURN
ENDFUNC
ENDTEXT
RETURN lcHeader
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/[email protected]
** 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.
