el control ShockwaveFlash 2da Parte Transparente
Publicado por jimmito (39 intervenciones) el 15/02/2006 17:45:19
Saludos!! veran!!
he estado investigando el susodicho control..
y pues.!! me doy cuenta que las propiedades!! no se actualizan en tiempo de ejecucion!!!!
solo funcionan en tiempo de diseño.!!
ahora el pk no se!!
lo digo pk .. miren este es el codigo..
copien este codigo..!!!
y agregen 4 comamnd
1 control ShockwaveFlash1
y un textbox
y despues que cargue en el text.. y le den cargar.!! nada funciona!!
alguien me podria dar una mano..?
ya me raya..!! este horror.!!
Option Explicit
Private Sub Command1_Click()
ShockwaveFlash1.Movie = Text1.Text
End Sub
Private Sub Command2_Click()
ShockwaveFlash1.WMode = "Transparent"
End Sub
Private Sub Command3_Click()
ShockwaveFlash1.WMode = "Window"
End Sub
Private Sub Command4_Click()
ShockwaveFlash1.WMode = "Opaque"
End Sub
Private Sub Command5_Click()
ShockwaveFlash1.Play
End Sub
Private Sub Command6_Click()
ShockwaveFlash1.Stop
End Sub
Private Sub Form_Load()
Text1 = "C:\Program Files\QueueSmart_Cliente Dev RC 40\Skins\Default\Tarjeta.swf"
End Sub
he estado investigando el susodicho control..
y pues.!! me doy cuenta que las propiedades!! no se actualizan en tiempo de ejecucion!!!!
solo funcionan en tiempo de diseño.!!
ahora el pk no se!!
lo digo pk .. miren este es el codigo..
copien este codigo..!!!
y agregen 4 comamnd
1 control ShockwaveFlash1
y un textbox
y despues que cargue en el text.. y le den cargar.!! nada funciona!!
alguien me podria dar una mano..?
ya me raya..!! este horror.!!
Option Explicit
Private Sub Command1_Click()
ShockwaveFlash1.Movie = Text1.Text
End Sub
Private Sub Command2_Click()
ShockwaveFlash1.WMode = "Transparent"
End Sub
Private Sub Command3_Click()
ShockwaveFlash1.WMode = "Window"
End Sub
Private Sub Command4_Click()
ShockwaveFlash1.WMode = "Opaque"
End Sub
Private Sub Command5_Click()
ShockwaveFlash1.Play
End Sub
Private Sub Command6_Click()
ShockwaveFlash1.Stop
End Sub
Private Sub Form_Load()
Text1 = "C:\Program Files\QueueSmart_Cliente Dev RC 40\Skins\Default\Tarjeta.swf"
End Sub
Valora esta pregunta


0