fbpx
Welcome, Guest
Username: Password: Remember me
Qui si parla italiano
  • Page:
  • 1

TOPIC: WebBrowser editabile

WebBrowser editabile 7 months 12 hours ago #7331

  softdevo@tiscali.it's Avatar Topic Author Offline Posts: 93
In Vulcan usavo il controllo Webbrowser come editor HTML con questo codice nel CONSTRUCTOR della pagina:

SELF:oWebBrowser1:PreviewKeyDown += System.Windows.Forms.PreviewKeyDownEventHandler{ SELF , @WebBrowser1PreviewKeyDown() }

SELF:oWebBrowser1:AllowNavigation := FALSE
SELF:oWebBrowser1:AllowWebBrowserDrop := FALSE
SELF:oWebBrowser1:ScriptErrorsSuppressed := TRUE

SELF:oWebBrowser1:DocumentText := "<html><body></body></html>"
IVarPut(SELF:oWebBrowser1:Document:DomDocument,#DesignMode,"On")
SELF:oWebBrowser1:Document:ExecCommand("fontSize", FALSE,3)
Ora la funzione ivarput non funziona

Descrizione: No exported variable

Funzione : XSharp.RT
Oggetto : IVarPut

Stack :
in XSharp.RT.OOPHelpers.IVarPut(Object oObject, String cIVar, Object oValue, Boolean lSelf)
in XSharp.RT.Functions.IVarPut(Object o, String cIVar, __Usual uValue)
in WSendMail..ctor()

Qualche idea?

Danilo

Please Log in or Create an account to join the conversation.

WebBrowser editabile 7 months 11 hours ago #7332

  Chris's Avatar Chris Offline Posts: 1335
Hi Danilo, in which line of code does the error happen?
XSharp Development Team
chris(at)xsharp.eu

Please Log in or Create an account to join the conversation.

WebBrowser editabile 7 months 11 hours ago #7333

  softdevo@tiscali.it's Avatar Topic Author Offline Posts: 93
AT line:

IVarPut(SELF:oWebBrowser1:Document:DomDocument,#DesignMode,"On")

Danilo

Please Log in or Create an account to join the conversation.

WebBrowser editabile 7 months 7 hours ago #7334

  Chris's Avatar Chris Offline Posts: 1335
Oops, sorry, I did not see this line before. Has the Document object been created, before you try to access it? I think you need to open a page first. Please do a

? SELF:oWebBrowser1:Document:DomDocument:GetType():ToString()

before you use the IVarPut(), what type does it return?

Chris
XSharp Development Team
chris(at)xsharp.eu

Please Log in or Create an account to join the conversation.

WebBrowser editabile 7 months 7 hours ago #7335

  George's Avatar George Offline Posts: 91
Danilo,

as Chris said:
>Has the Document object been created, before you try to access it?

I think you have to change the DesignMode into the Event: DocumentCompleted:

PRIVATE WebBrowser AS System.Windows.Forms.WebBrowser

SELF:WebBrowser := System.Windows.Forms.WebBrowser{}
...
SELF:WebBrowser:DocumentCompleted += System.Windows.Forms.WebBrowserDocumentCompletedEventHandler{ SELF, @WebBrowser_DocumentCompleted() }
...
PRIVATE METHOD WebBrowser_DocumentCompleted( sender AS System.Object, e AS System.Windows.Forms.WebBrowserDocumentCompletedEventArgs ) AS System.Void
SELF:WebBrowser:Document:ExecCommand("EditMode", True, NULL)
RETURN

or someting similar.

regards
George

Please Log in or Create an account to join the conversation.

WebBrowser editabile 6 months 4 weeks ago #7336

  softdevo@tiscali.it's Avatar Topic Author Offline Posts: 93
Before calling ivarput I initialize the document:
SELF:oWebBrowser1:DocumentText := "<html><body></body></html>"

and I have the method:

METHOD WebBrowser1DocumentCompleted(sender AS System.Object , e AS System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) AS System.Void
LOCAL oType AS Type
LOCAL oPropertyInfo AS System.Reflection.PropertyInfo
LOCAL oWB := (WebBrowser)sender AS WebBrowser

oType :=oWB:Document:DomDocument:GetType()

oPropertyInfo := oType:GetProperty("designMode") // is null
oPropertyInfo:SetValue(oWB:Document:DomDocument, "On", NULL)

RETURN

Please Log in or Create an account to join the conversation.

WebBrowser editabile 6 months 4 weeks ago #7337

  wriedmann's Avatar wriedmann Away Posts: 1739
Ciao Danilo,

with the Vulcan runtime it worked and with the X# runtime not anymore?

(scrivo in inglese che anche gli altri non hanno bisogno di traduttori).

Saluti

Wolfgang
Wolfgang Riedmann
Meran, South Tyrol, Italy

www.riedmann.it - docs.xsharp.it

Please Log in or Create an account to join the conversation.

WebBrowser editabile 6 months 4 weeks ago #7339

  softdevo@tiscali.it's Avatar Topic Author Offline Posts: 93
The problem is solved

Danilo

SELF:oWebBrowser1:AllowNavigation := FALSE
SELF:oWebBrowser1:AllowWebBrowserDrop := FALSE
SELF:oWebBrowser1:ScriptErrorsSuppressed := TRUE

SELF:oWebBrowser1:DocumentText := "<html><body></body></html>"
SELF:oWebBrowser1:Document:ExecCommand("EditMode",TRUE,NIL)
SELF:oWebBrowser1:Document:ExecCommand("fontSize",FALSE,3)

Please Log in or Create an account to join the conversation.

  • Page:
  • 1
Moderators: wriedmann