AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia SVG im TWebBrowser manipulieren
Thema durchsuchen
Ansicht
Themen-Optionen

SVG im TWebBrowser manipulieren

Ein Thema von AEngel77 · begonnen am 17. Mär 2015 · letzter Beitrag vom 17. Mär 2015
Antwort Antwort
AEngel77

Registriert seit: 23. Aug 2011
2 Beiträge
 
#1

SVG im TWebBrowser manipulieren

  Alt 17. Mär 2015, 12:12
Hallo zusammen,

ich möchte ein SVG im TWebBrowser laden und manipulieren,

1. Laden und anzeigen - geht
2. Manipulieren von Attributen - geht

3. Hinzufügen neuer Objekte - geht nicht

Ich erzeuge mir mit

doc.createElementNS(NS, 'rect');

ein Rechteck, weise Größe etc. per Attribut zu, ermittle mir dann ein bestehendes Objekt und ersetze es mit

parentNodeNode.replaceChild(newHtmlNode, oldHtmlNode); (Habe auch schon insertBefore ausprobiert, ändert nichts am eigentlichen Problem)

Ergebnis: Das alte Objekt verschwindet, das neue wird jedoch nicht angezeigt. Wenn ich den Browser veranlasse, das aktuelle SVG zu speichern und anschließend dieses neu lade, wird das Rechteck korrekt angezeigt.

"Irgendwie" registriert der Browser nicht, dass dort ein neues Objekt existiert und dieses gezeichnet werden muss.

Vielen Dank für jede Idee!

André Engelshove
  Mit Zitat antworten Zitat
puderle
(Gast)

n/a Beiträge
 
#2

AW: SVG im TWebBrowser manipulieren

  Alt 17. Mär 2015, 13:53
Du musst Bezug auf das Parent-Element nehmen und das alte Child löschen und ersetzen.

Einfach nur ersetzen reicht scheinbar nicht.

http://www.selfsvg.info/?section=10.5#listing_10-17

ist ein JavaScript-Listing was vielleicht einiges klärt. Auszug aus dem Text ein paar Zeilen darüber:


[...] Hierfür gibt es die zwei Methoden removeChild() und replaceChild(). Als Parameter erhält die Methode removeChild() eine Referenz auf den zu löschenden Knoten. replaceChild() hingegen besitzt zwei Parameter, von denen der erste auch eine Referenz auf den zu löschenden Knoten und der zweite eine Referenz auf einen neuen Knoten beinhaltet. >>>> Damit diese Methoden angewendet werden können, muß das Vaterelement des zu löschenden oder zu ersetzenden Knotens bekannt sein. Die Eigenschaft parentNode eines Knotens liefert dessen Vaterknoten."

var oldChild = document.getElementById("sbX1");
var newChild = document.createElement("div");
newChild.id= "sbYY1";

// Replace oldchild on the parent node
// You can reference the child's parent via .parentNode
// or retrieve it directly with document.getElementById('theparentId')
oldchild.parentNode.replaceChild(newChild, oldChild);

Geändert von puderle (17. Mär 2015 um 14:09 Uhr)
  Mit Zitat antworten Zitat
AEngel77

Registriert seit: 23. Aug 2011
2 Beiträge
 
#3

AW: SVG im TWebBrowser manipulieren

  Alt 17. Mär 2015, 14:41
Hi,

also, z.Zt. rufe ich folgende Funktion auf: (SvgDoc = ISVGDocument)

Delphi-Quellcode:
  procedure MakeTextBox(textElement: ISvgTextContentElement);
  var
    doc: IHTMLDocument7;
    newHtmlElement: IHTMLElement;
    parentNode: IHTMLElement;
    parentNodeNode: IHTMLDOMNode;
    oldHtmlNode: IHTMLDOMNode;
    newHtmlNode: IHTMLDOMNode;
    textHtmlElement: IHtmlElement;
  begin
    SvgDoc.QueryInterface(IID_IHTMLDocument7, doc);
    NS := 'http://www.w3.org/2000/svg';

    newHtmlElement := doc.createElementNS(NS, 'rect');

    setAttributeNS(newHtmlElement, cSVGstroke, ColorToSvgColor(clBlue));
    setAttributeNS(newHtmlElement, cSVGfill, ColorToSvgColor(clBlue));
    setAttributeNS(newHtmlElement, 'x', 10);
    setAttributeNS(newHtmlElement, 'y', 10);
    setAttributeNS(newHtmlElement, 'width', 50);
    setAttributeNS(newHtmlElement, 'height', 50);

    newHtmlElement.QueryInterface(IID_IHTMLDOMNode, newHtmlNode);

    textElement.QueryInterface(IID_IHTMLElement, textHtmlElement);

    parentNode := textHtmlElement.parentElement;
    parentNode.QueryInterface(IID_IHTMLDOMNode, parentNodeNode);
    textElement.QueryInterface(IID_IHTMLDOMNode, oldHtmlNode);

// parentNodeNode.removeChild(oldHtmlNode);
// parentNodeNode.appendChild(newHtmlNode);

// parentNodeNode.insertBefore(newHtmlNode, oldHtmlNode);

    newHtmlNode := parentNodeNode.replaceChild(newHtmlNode, oldHtmlNode);
end;
Die Erzeugung per Javascript hatte ich auch schon gefunden / ausprobiert - das geht. Nur aus Delphi bekomme ich es nicht hin. Wobei er es ja scheinbar richtig einfügt, wie gesagt, speichern und neuladen, dann ist alles wie es sein soll - nur für mich keine Lösung

Danke!
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:02 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz