用面向对象的方法在DIRECTOR中实现滚动条

ScreenField = line pCurrentTopLine to (pCurrentTopLine + (pnVisibleLines - 1)) of pTheTextString
set pixelOffset = integer(pHeightPerLine * float(pCurrentTopLine - 1))
set the locV of sprite pchThumb = pThumbTop + pixelOffset
updateStage
end mScroll

　　尽管对象的概念对一些用户来说并不好理解，但LINGO中对象的使用将必然在DIRCTOR 高级编程中占主要地位。我使用LINGO对象编程时间不常。希望与DIRECTOR爱好者们探讨这方面的问题。