PureBoard

Verfasst: **22.06.2011 09:44**

Hallo, möchte den ImTranslator v. 4.2 in einen Fenster meiner Anwendung einbinden, komme aber nicht recht weiter.
Code zum Einbinden von ImTranslator

Code: Alles auswählen

HTML + "<!-- Begin Widget Translator 510x510 -->"
HTML + "<script type="text/javascript">"
HTML + "var dir="en/de";"
HTML + "var loc="de"; "
HTML + "</script>"
HTML + "<div id="TranslatorBuilder"><a href="http://imtranslator.net/translation/" id="ImTranslator" target="_top" title="Translator - imtranslator.net">Translator</a><div id=ImBack></div></div>"
HTML + "<script type="text/javascript" src="http://imtranslator.net/wm-im-510x510.js"></script>"
HTML + "<!-- End Widget Translator 510x510 -->"

Nun habe ich den Code eingefügt und nun kommen nur Fehlermeldungen, siehe Semikolon Einträge.

Code: Alles auswählen

Procedure Datensatz_PopUpTextTranslator()

  HideGadget(#Container1, #True)
  HideGadget(#Container2, #True)
  HideGadget(#Container3, #True)
  HideGadget(#Container4, #True) 
  HideGadget(#Container5, #True)
  HideGadget(#Container6, #True) 
  HideGadget(#Container7, #True)
  HideGadget(#Container8, #False) 
   
  HTML_Mode=1
  DatensatzNaviZeigerRettung=DatensatzNaviZeiger
  Define HTML.s
  HTML.s=""
  HTML.s
  Titel$= "Translator"
  Ueberschift$=GetGadgetText(#S_Stichwort)
  Delay(20)
  HTML + "<html>"
  HTML + "  <head>"
  HTML + "<title>" + Titel$ + "</title>"
  HTML + "  </head>"
  HTML + "  <body text='#000000' bgcolor='#FFFFFF'>"
  HTML + "   <h1>" + Ueberschift$ + "</h1>"
  HTML + "<!-- Begin Widget Translator 510x510 -->"
  ; HTML + "<script type="text/javascript">"
  ; HTML + "var dir="en/de";"
  ; HTML + "var loc="de"; "
  HTML + "</script>"
  ;HTML + "<div id="TranslatorBuilder"><a href="http://imtranslator.net/translation/" id="ImTranslator" target="_top" title="Translator - imtranslator.net">Translator</a><div id=ImBack></div></div>"
  ;HTML + "<script type="text/javascript" src="http://imtranslator.net/wm-im-510x510.js"></script>"
  HTML + "<!-- End Widget Translator 510x510 -->"
  HTML + "  </body>"
  HTML + "</html>"
  SetGadgetItemText(#TranslatorGadget, #PB_Web_HtmlCode, HTML)

EndProcedure

Kann mir jemand auf die Sprünge helfen?
Gruss ... Velindos

Verfasst: **22.06.2011 10:25**

meine Glaskugel sagt mir, dass Du die doppelten
Anführungszeichen (") im HTML durch Chr(34) ersetzen musst.

Code: Alles auswählen

HTML + "<script type="text/javascript">"

-->

Code: Alles auswählen

HTML + "<script type=" + Chr(34) + "text/javascript" + Chr(34) + ">"

Grüße ... Kiffi

Verfasst: **22.06.2011 12:25**

Hallo Kiffi,
fein was von Dir zu hören, wie du schon sagst, stimmt. Habe noch weitere Variante wo ich im HTML Code das Zeichen " mit ' ersetzt habe und funkt!

Code: Alles auswählen

Procedure Datensatz_PopUpTextTranslator()

  HideGadget(#Container1, #True)
  HideGadget(#Container2, #True)
  HideGadget(#Container3, #True)
  HideGadget(#Container4, #True) 
  HideGadget(#Container5, #True)
  HideGadget(#Container6, #True) 
  HideGadget(#Container7, #True)
  HideGadget(#Container8, #False) 
   
  HTML_Mode=1
  ;Ueberschift$=GetGadgetText(#S_Stichwort)
  Ueberschift$="ONLINE imTranslator.net"
  DatensatzNaviZeigerRettung=DatensatzNaviZeiger
  
  Define HTML.s
  Daten1$=""
  HTML.s=""
  HTML.s
  
  Delay(20)
  HTML + "  <body text='#000000' bgcolor='#FFFFFF'>"
  HTML + "   <h1>" + Ueberschift$ + "</h1>"
  HTML + Daten1$ + "<br />"
  HTML + "<br />"

  HTML + "<!-- Begin Widget Translator 510x510 -->"
  HTML + "<script type='text/javascript'>"
  HTML + "var dir='de/en';"
  HTML + "var loc='de'; "
  HTML + "</script>"
  HTML + "<div id='TranslatorBuilder'><a href='http://imtranslator.net/translation/' id='ImTranslator' target='_top' title='Translator - imtranslator.net'>Translator</a><div id=ImBack></div></div>"
  HTML + "<script type='text/javascript' src='http://imtranslator.net/wm-im-510x510.js'></script>"
  HTML + "<!-- End Widget Translator 510x510 -->"

  HTML + "  </body>"
  HTML + "</html>"
  
  ;HTML = ReplaceString(HTML, "''", Chr(34))
    ;HTML = ReplaceString(HTML, "'", Chr(34))

  SetGadgetItemText(#TranslatorGadget, #PB_Web_HtmlCode, HTML)

Danke für deinen TIPP!

Natürlich wollte ich den Translator gleich mit meinen String$ versorgen, dafür habe ich jedoch keinen Ansatz, selbiges auch nicht für Return vom Translator, vielleicht hast du noch einen Tipp!

Nochmals Danke, gruss ... Velindos

Verfasst: **22.06.2011 12:54**

Velindos hat geschrieben:Natürlich wollte ich den Translator gleich mit meinen String$ versorgen, dafür habe ich jedoch keinen Ansatz, selbiges auch nicht für Return vom Translator, vielleicht hast du noch einen Tipp!

nee, sorry, ich kenne mich mit diesem Teil nicht aus. Da müsstest
Du vielleicht den Support mal anfunken, welchen Parameter man da
setzen /abfragen muss. Vielleicht können die Dir weiterhelfen.

Grüße ... Kiffi

PureBoard

ImTranslator v. 4.2 in PB Fenster einbinden

ImTranslator v. 4.2 in PB Fenster einbinden

Re: ImTranslator v. 4.2 in PB Fenster einbinden

Re: ImTranslator v. 4.2 in PB Fenster einbinden

Re: ImTranslator v. 4.2 in PB Fenster einbinden