>This will also do the trick I think (following a recent "scroll
>property" thread). I don't know about elegant though. :)
>
>on gotoLine theLine,theField
> lock screen
> put 8 into tTidyUp -- experiment with this number
> select line theLine of field theField
> put the top of field theField into tTop
> put the scroll of field theField into tScroll
> put item 2 of the selectedLoc into tSelY
> put tSelY - tTop + tScroll into tNewScroll
> set the scroll of field theField to tNewScroll - tTidyUp
> select empty
> unlock screen
>end gotoLine
>
>Cheers
>Dave Cragg
Thanks for the suggestion Dave.
Best regards
Peter
--------------------------------------------------------
Peter Reid
Reid-IT Limited, Loughborough, Leics., UK
Tel: +44 (0)1509 268843 Fax: +44 (0)1509 264986
E-mail: [EMAIL PROTECTED]
Web: http://www.reidit.co.uk
