Perdoname, por el retraso pero me había olvidado de ti, la próxima vez si ves que tardo más de dos días en contestar avisame en
[email protected].
Bien aquí te pongo tres comportamientos:( Funcionan poerfectamente y te serán muy útiles, si no lo sabes usar bien me puedes hacer otra pregunta para aprender a usarlos)
-1º- Este comportamiento es para cuando quieras incluir botones de subir y bajar texto y nada más (es decir sin barra de texto).
-2º-Este coportamiento es para los botones de subir y bajar texto que tengan una barra de texto (para usar este comportamiento también debes usar el tercero).
3º-Este comportamiento es para usar conjuntamennte con el 2º y se lo debes vincular al topo de la barra de texto)
----------------------------------------------
1º
--Creado por bedelludrica
property p_velocidad, p_texto,p_rutina
on getBehaviorTooltip me
return \
"Este comportamiento debes vincularlo al topo " & \
"e indicar en que sprite se encuentra la barra de desplazamiento de texto " & \
"NOTA:da igual donde coloques el topo pues se colocara en la posición" &\
"de volumen 0 al comenzar la película"
end getBehaviorTooltip
on getPropertyDescriptionList me
lista=[:]
addprop lista, #p_texto,[#comment:"¿elige el texto ?",\
#format:#member,#default:""]
addProp lista, #p_rutina, [#comment: "elige la rutina" ,#format:#String\
,#range:["On MouseDown","On MouseEnter"]\
,#default:"On MouseDown"]
addprop lista, #p_velocidad,[#comment:"¿Cual es la velocidad para subir o bajar texto?",\
#format:#integer,#default:2, #range:[#min:-6,#max:6]]
return lista
end getPropertyDescriptionList
on exitframe me
if p_rutina = "On MouseDown" then
if rollover(me.spritenum) then
if the mousedown then
scrollByLine member p_texto, p_velocidad
end if
end if
else if p_rutina = "On MouseEnter" then
if rollover(me.spritenum) then
scrollByLine member p_texto, p_velocidad
end if
end if
end
----------------------------------------------
2º
--creado por bedelludrica
property p_velocidad, p_barra,p_rutina
on getBehaviorTooltip me
return \
"Este comportamiento debes vincularlo al topo " & \
"e indicar en que sprite se encuentra la barra de desplazamiento de texto " & \
"NOTA:da igual donde coloques el topo pues se colocara en la posición" &\
"de volumen 0 al comenzar la película"
end getBehaviorTooltip
on getPropertyDescriptionList me
lista=[:]
addprop lista, #p_barra,[#comment:"¿que sprite es la barra del topo?",\
#format:#integer,#default:1]
addProp lista, #p_rutina, [#comment: "elige la rutina" ,#format:#String\
,#range:["On MouseDown","On MouseEnter"]\
,#default:"On MouseDown"]
addprop lista, #p_velocidad,[#comment:"¿Cual es la velocidad para subir o bajar texto?",\
#format:#integer,#default:2, #range:[#min:-6,#max:6]]
return lista
end getPropertyDescriptionList
on exitframe me
if p_rutina = "On MouseDown" then
if rollover(me.spritenum) then
if the mousedown then
sprite(p_barra).locv= sprite(p_barra).locv+p_velocidad
end if
end if
else if p_rutina = "On MouseEnter" then
if rollover(me.spritenum) then
sprite(p_barra).locv= sprite(p_barra).locv+p_velocidad
end if
end if
end
----------------------------------------------
3º
--creado por bedelludrica
property p_barra,p_maximo_o_minimo, volumen,altura, linea_f
on getBehaviorTooltip me
return \
"Este comportamiento debes vincularlo al topo " & \
"e indicar en que sprite se encuentra la barra de desplazamiento de texto " & \
"NOTA:da igual donde coloques el topo pues se colocara en la posición" &\
"de volumen 0 al comenzar la película"
end getBehaviorTooltip
on getPropertyDescriptionList me
list=[:]
addprop list, #p_barra,[#comment:"¿que sprite es la barra del topo?",\
#format:#integer,#default:2]
return list
end getPropertyDescriptionList
on enterframe me
sprite(me.spritenum).loch=sprite(p_barra).loch
sprite(me.spritenum).loch=sprite(p_barra).loch
end
on beginsprite me
sprite (me.spritenum).moveableSprite =true
altura=sprite(p_barra).height
localizacion=sprite(p_barra).locv
linea_f=0
sprite(me.spritenum).locv=localizacion
sprite(me.spritenum).loch=sprite(p_barra).loch
updatestage
end
on exitframe me
volumen_max= member("texto").height+10- member("texto").pageheight
sprite(me.spritenum).constraint= p_barra
altura=sprite(p_barra).height
topo_inicio=sprite(p_barra).locv
topo_actual=sprite(me.spritenum).locv
topo_relativo=topo_actual-topo_inicio
volumen=(topo_relativo*volumen_max)/altura
member("texto").scrolltop=volumen
end