Url

Te voy a poner dos comportamientos, uno para abrir páginas web locales y otro para abrir páginas web. Como me imagino que no sabes lo que son los comportamientos, te lo explico primero:
Como se usan los comportamientos:
1°-Debes copiarlos en la ventana script.
2°-Debes pulsar la tecla del inspector (i de color azul ), que está en la ventana script
3°-Ahora se te ha abierto la ventana inspector de propiedades
4°-Verás en esa ventana el tipo de sprite como movie en un menu desplegable
5°-Debes cambiar el tipo de sprite a behaviour
6°-Cierra la ventana property inspertor
7°-Ahora dale al botón con forma de rayo que está en la ventana script
8°-Ahora ya tienes un comportamiento soló te queda ponerle un nombre
9°- Tienes dos forma de usarlo
10°-La primera forma es la siguiente
11°-Vete al stage y pulsa sobre el miembro que necesita ese comportamiento
12°-pulsa sobre ese miembro el botón derecho del ratón
13°-En el menu desplegable que te aparece escoge behaviour
14°-Ahora puedes asociarle a ese miembro todos los comportamientos que necesite pulsando sobre la tecla +
15°-La segunda forma es la siguiente (la más útil)
16°-Vete al menu FILE y elige NEW y después cast
17°-Escoge el cast como external y dale un nombre
18°-Ahora sólo te queda copiar los comportamientos que estén relacionados en un cast distinto (video, sonido,...)
19°-Salva ese cast externo desde el menu archivo
20°-copia ese cast en la carpeta libs donde tengas director
21°-Vete a la ventana window de director y entra en la library palette
22°-Ahora tendrás ahí tus comportamientos
22°-Para usarlos sólo tienes que arrastrarlos sobre el miembro necesario
-------------------------------------Comportamiento 1
property p_direccion, p_rutina
on getBehaviorTooltip me
return \
"usa este comportamiento para dirigirte a una pagina web"
end getBehaviorTooltip
on getPropertyDescriptionList
set lista= [:]
addProp lista, #p_direccion, [#comment: "escribe la direccion ",#format:#String,\
#default: "www.macromedia.com" ]
addProp lista, #p_rutina, [#comment: "elige la rutina" ,#format:#String\
,#range:["On MouseUp","On MouseDown","On MouseEnter","On MouseLeave"]\
,#default:"On MouseUp"]
return lista
]
end getPropertyDescriptionList
on MouseUp me
if p_rutina = "On MouseUp" then
gotoNetPage "http://"p_direccion
end if
end MouseUp
on MouseDown me
if p_rutina = "On MouseDown" then
gotoNetPage "http://"p_direccion
end if
end MouseDown
on MouseEnter me
if p_rutina = "On MouseEnter" then
gotoNetPage "http://"&p_direccion
end if
end MouseEnter
on MouseLeave me
if p_rutina = "On MouseLeave" then
gotoNetPage "http://"&p_direccion
end if
end MouseLeave
----------------------------comportamiento 2
property p_direccion, p_rutina
on getBehaviorTooltip me
return \
"usa este comportamiento para abrir una página"\
" HTM que se encuentra en un Cd, disco duro, ... "
end getBehaviorTooltip
on getPropertyDescriptionList
set lista= [:]
addProp lista, #p_direccion, [#comment: "escribe la direccion ",#format:#String,\
#default: "C:\mis documentos\bedelludrica.htm" ]
addProp lista, #p_rutina, [#comment: "elige la rutina" ,#format:#String\
,#range:["On MouseUp","On MouseDown","On MouseEnter","On MouseLeave"]\
,#default:"On MouseUp"]
return lista
]
end getPropertyDescriptionList
on MouseUp me
if p_rutina = "On MouseUp" then
gotoNetPage p_direccion
end if
end MouseUp
on MouseDown me
if p_rutina = "On MouseDown" then
gotoNetPage p_direccion
end if
end MouseDown
on MouseEnter me
if p_rutina = "On MouseEnter" then
gotoNetPage p_direccion
end if
end MouseEnter
on MouseLeave me
if p_rutina = "On MouseLeave" then
gotoNetPage p_direccion
end if
end MouseLeave