Oppure

Loading
16/10/12 17:31
bruno.demarini
Ciao a tutti,
come sapete facendo click destro sul webbrowser si ha la possibilità di fare lo zoom ("Ingrandisci";). Tutto ok, però vorrei fare questa azione via codice. Qualcuno ha qualche idea?
Grazie!

P.S: Facendo il login ho cliccato anziché su login, sul pulsante subito a destra. Poi sono entrato, però intanto è arrivata l'email "è stata inoltrata una richiesta da tot per resettare la tua password su pierotofy.it.";
Ma non voglio resettare nulla, devo fare qualcosa?

P.P.S: Nel webbrowser io non mostro un sito web, bensì dei file swf
Ultima modifica effettuata da bruno.demarini 16/10/12 19:00
aaa
16/10/12 19:39
Qualcosa del genere

Private Enum Exec
   OLECMDID_OPTICAL_ZOOM = 63
End Enum

Private Enum execOpt
   OLECMDEXECOPT_DODEFAULT = 0
   OLECMDEXECOPT_PROMPTUSER = 1
   OLECMDEXECOPT_DONTPROMPTUSER = 2
   OLECMDEXECOPT_SHOWHELP = 3
End Enum


e dove ti serve

Try
   Dim MyWeb As Object
   MyWeb = Me.WebBrowser1.ActiveXInstance
   MyWeb.ExecWB(Exec.OLECMDID_OPTICAL_ZOOM, execOpt.OLECMDEXECOPT_PROMPTUSER, 220, IntPtr.Zero)
Catch ex As Exception
   MessageBox.Show("Zoom error : " + ex.Message)
End Try
Ultima modifica effettuata da 16/10/12 19:42
16/10/12 20:09
bruno.demarini
Grazie per la risposta, ma avevo già provato questo codice e funziona solo se all'interno del webbrowser mostro un sito web (es: google.it), mentre se sto mostrando un file swf in locale non funziona... Può darsi che sia dovuto al fatto che si usa ActiveXInstance ?
Comunque ho provato anche a usare il controllo COM Shockwave Flash Object, che permette di mostrare file swf e presenta un metodo Zoom(byval factor as integer) ma quest'ultimo non funziona e non capisco perché... Grazie..
Ultima modifica effettuata da bruno.demarini 16/10/12 20:11
aaa