Delete blank lines/No scroll change

[Sannyasin Sivakatirswami]

Is there a simple way to delete lines in a list, such that a blank line 
does not remain afterwards and not throw the scroll of the  field back 
to zero?

put empty into line 11 of fld "inputList"  ## leaves a blank empty line

   put the clicktext & cr after fld "outputList"
   delete the clickline  ## leaves a blank line

Context: User is working on a mailing list... either deleting entries 
or moving entries to another field.. .in both cases we want the line 
that is clicked on to disappear and not leave a blank line in its 
place. If one runs a "replace (cr & cr) with cr in fld "inputList"  the 
scroll is set to zero

put the scroll of fld "inputList" into tPosition
replace (cr & cr) with cr in fld "inputList
set the scroll of fld "inputList" to tPosition

does work... but I was wondering if there is a way which would leave 
the scroll of the field untouched in the first place.

Thanks
Sivakatirswami