ImTranslator v. 4.2 in PB Fenster einbinden

Anfängerfragen zum Programmieren mit PureBasic.
Antworten
Benutzeravatar
Velindos
Beiträge: 598
Registriert: 15.11.2010 10:56

ImTranslator v. 4.2 in PB Fenster einbinden

Beitrag von Velindos »

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
Windows 7/8/8.1/10 (32/64-Bit) |Ubuntu 10.4 (64-Bit) |Purebasic 5.71 LTS (32/64-Bit)
Nach oben
Benutzeravatar
Kiffi
Beiträge: 10714
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Re: ImTranslator v. 4.2 in PB Fenster einbinden

Beitrag von Kiffi »

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
a²+b²=mc²
Nach oben
Benutzeravatar
Velindos
Beiträge: 598
Registriert: 15.11.2010 10:56

Re: ImTranslator v. 4.2 in PB Fenster einbinden

Beitrag von Velindos »

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
Windows 7/8/8.1/10 (32/64-Bit) |Ubuntu 10.4 (64-Bit) |Purebasic 5.71 LTS (32/64-Bit)
Nach oben
Benutzeravatar
Kiffi
Beiträge: 10714
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Re: ImTranslator v. 4.2 in PB Fenster einbinden

Beitrag von Kiffi »

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
a²+b²=mc²
Nach oben
Antworten

Zurück zu „Anfänger“