[MX - VB] Comandare un bottone flash in VB

[wdstck81]

Ciao a tutti... qualcuno saprebbe dirmi se è possibile, e se si, come fare , per utilizzarere un pulsante fatto in flash, in visual basic? Io so già come inserire un filmato fatto con flash in vb, ma non sono riuscito a trovare gli eventi on release ecc ecc ecc...
qualcuno mi sa aiutare?

grazie a tutti!!!

[Francesco_76]

hai gia fatto qualcosa tra vb e flash, tipo passaggio di variabili da vb a flash, oppure controllo di un movie da vb??

[wdstck81]

no, non ho mai fatto nulla...
hai qualche esempio o qualche guida che mi pu aiutare?
grazie mille!!

[Francesco_76]

Io mi sto un pò impazzendo, forse in due riusciamo a cavarci qualcosa..

ti do qualcosa su cui iniziare..

prepara un form in vb ed inserisci ShockwaveFlash ed un pulsante acui assegni queste istruzioni

Private Sub Command1_Click()
    
    Flsmovie.Visible = True
    Flsmovie.Loop = False
    Flsmovie.Movie = App.Path & "\tuofile.swf"
    Flsmovie.SetVariable "testo", "Prova visual Basic"
    Flsmovie.Play
    Command1.Enabled = False
End Sub

poi fai un file flash con dentro una variabile di nome "testo"

in questo modo riesci a passare da vb un valore a flash.. adesso bisogna riuscire a fare il contrario :master:

Come te la cavi con vb??

[wdstck81]

ho appena incominciato...:bubu:

[wdstck81]

con getVariable("_root.ogg.nomevar")
ti fai tornare la variabile da flash!!

[Francesco_76]

Scusa ma in che senso...

io ho un pulsante in flash e voglio che al click una casella di testo in vb (es: Text1) scriva "ciao"

come gli passo questo valore??? :master:

intanto sei riuscito a fare come ti ho scritto sopra??

[wdstck81]

io ho fatto un filmato flash contenente 5 bottoni, ad ogni bottone faccio cambiare il contenuto di una variabile.
da visual basic, vado a leggere il contenuto di quella variabile e la scrivo in una label.
solo che per visualizzare il nuovo valore della variabile, non essendoci un evento no release o no click sull'oggetto di flash, devo creare un bottone in vb che mi fa, in pratica , il refresh della lable!!!
se aspetti le 12.30 e mi dai la tua mail ti spedisco l'esempietto!

[Francesco_76]

ho trovato...

code VB

Private Sub Flsmovie_FSCommand(ByVal command As String, ByVal args As String)
    If command = "messaggio" Then MsgBox args, vbInformation, App.Title
    If command = "quit" Then
        Flsmovie.StopPlay
        Flsmovie.Rewind
        Flsmovie.Visible = False
        Command1.Enabled = True
        End
    End If
End Sub

code pulsante flash

on (release) {
    fscommand(command, "quit"); //oppure "messaggio"
}

[wdstck81]

però quello che a me serve, è utilizzare un pulsante fatto in flash, con il codice visual basic, quindi avere qualcosa che mi simuli l'on click, sul mio filmato flash!!!