>Hi all,
>
>I have a function key that does the following:
>
>Copy the selected text to the clipboard, type in a "*{ 01/01/01 fj ", a paste from the clipboard, then a closeing comment. It ends with a backwards search to find the opening bracket and position the cursor at the end of that line so that I can add comments about the block of code I am about to edit.
>
>When I run this, two or three lines following the cut and pasted text dissappear. They are not gone, just invisible. If I move the cursor down to where they should be and type, they magically reappear. I can also pageup/down to fix it as well.
>
>I want to add a command similar to _screen.activeform.cls(). However, I can't get an object reference to the editor.

Fletcher - you can do the same sort of thing with an IntelliSense script and in the long run, that's probably a better solution. Here's one pretty close to what you're looking for:

LPARAMETER oFoxCode

oFoxcode.valuetype = "V"
local lcString, lcLeadingChar
lcLeadingChar = STRTRAN(oFoxCode.FullLine,LTRIM(oFoxCode.FullLine))
TEXT TO myvar TEXTMERGE NOSHOW
**********************************************************************
<>* TEG changed on <>
<>* ~
<>**********************************************************************
<>
ENDTEXT

RETURN myvar

(Full disclosure: I didn't write this. It came to me from John Hosier.)

Tamar