Delphi-PRAXiS - Delphi DeskBand mit Script

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi DeskBand mit Script (https://www.delphipraxis.net/65470-deskband-mit-script.html)

DeskBand mit Script

Hallo!

Meine Kenntnisse bei COM bestehen leider nur aus großen Leerstellen, mit herkömmlichen Suchen habe ich daher nichts finden können.
Ich möchte auf ein DeskBand im IE per Script zugreifen. Was muss dazu alles auf der Delphi Seite rein, um dann mit dem Object Tag darauf zugreifen und Aktionen auslösen bzw. Daten übergeben zu können? Möglich müsste es sein, die Google Toolbar scheint es ja so zu machen.

Re: DeskBand mit Script

An welchen Stellen greift eine Webseite auf die Google Toolbar zu? Andersherum okay, aber HTML/JS nach DeskBand :shock: Ich kenne die neueste Version der Toolbar nicht, aber sage mir kurz wie, bitte ;)

...:cat:...

Re: DeskBand mit Script

Über ein Script muss es gehen, da man das Kontextmenü des IE nur damit erweitern kann. Markiert man einen Begriff und wählt dann aus dem Menu die Suche, wird dieses Script ausgeführt:

Code:

			<html>

<object   id=gg align=top  classid="clsid:00EF2092-6AC5-47c0-BD25-CF2D5D657FEB" width=1 height=1 border=0 vspace=0></object>

<script language="JavaScript" defer>

  var parentwin = external.menuArguments;

  var doc = parentwin.document;

  var sel = doc.selection;

  var rng = sel.createRange();

  var strhtml = new String(rng.htmlText);

  var str = strhtml.replace(/<[^>]*>/g," ");

  str = str.replace(/\s+/g, " ");

  str = str.replace(/^\s*/,"");

  str = str.replace(/\s*$/,"");

  if (str.indexOf(" ") != -1)

    str = '"' + str + '"';

  var bnewwindow = external.menuArguments.event.shiftKey;

  var url = "http://www.google.com/search?sourceid=navclient-menuext&q=" + escape(str);

  try {

    url = gg.Search(String(str));

    bnewwindow = gg.OpenNewWindow();

  } catch (ex) { }

  if(bnewwindow)

    parentwin.open(url);

  else

    parentwin.navigate(url);

   </script>

</html>

[edit=sakura] [code]-tags Mfg, sakura[/edit]