Text Scroller Control

Unofficial Content

Download here

Control Description

The Text Scroller control is a cross browser widget that allows scrolling text or html in a box. It can be customized by setting several properties and has the ability to retrieve new texts from the server (using AJAX) every time it runs out of texts to scroll. In addition, when the mouse enters the scroll area, the current scrolling text stops allowing the user to read it.

 

Text Scroller Control picture 1

Text Scroller Control picture 2

Using the control

The control loads a SDT named TextScrollerData where you can specify the texts (collection) that will be displayed in the scrolling box. Each item (TextScrollerData.TextScrollerDataItem) of the TextScrollerData has a single "text" property:

Example

Sub 'SimpleSlideShowSample'

&item.Text = "text 1"   &textData.Add(&item)   &item = new()   &item.Text = "text 2"   &textData.Add(&item)   &item = new()   &item.Text = "text 3"   &textData.Add(&item)

 

EndSub

Control properties

 

Width

Sets control´s width

Height

Sets control´s height

Speed

Sets the text scrolling speed

PauseDelay

Sets the elapsed time between text messages.

Resize

Sets if images should be resized preserving its aspect ratio and fitting the control´s width and height

Appareance

 

BorderWidth

Sets the box border width

BorderColor

Sets the box border color

BackgroundImage

Sets the box background image

BackgroundColor

Sets the box background color

CellSpace

Sets the box cellSpace

CellPad

Sets the box cellPad

DataBindings

 

ImagesData

TextScrollerData SDT with all the images to be displayed.

Control Events

Every time the control displays all the given text it has the ability to go to the server (through AJAX) in order to load new texts to display. This can be accomplished through the GetMessages event as follows:


 

Event

textScroller1.GetMessages

&textData.clear()

&item.Text = "text 1"   &textData.Add(&item)   &item = new()   &item.Text = "text 2"   &textData.Add(&item)   &item = new()   &item.Text = "text 3"   &textData.Add(&item)

EndEvent

To Install It Please visit: Default Installation Instructions for User Controls.

Contact information

Please send feedback to: ncardeli@artech.com.uy