Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Bild im TWebbrowser Edit-Modus verschieben... (https://www.delphipraxis.net/15209-bild-im-twebbrowser-edit-modus-verschieben.html)

horst 23. Jan 2004 23:40


Bild im TWebbrowser Edit-Modus verschieben...
 
Wer weiß wie ich ein Bild/Image im TWebbrowser Edit-Modus verschieben kann?
ich würde es ja am liebsten so machen, (s. code unten) aber das
funktioniert nur bei elementen (div), die per stylesheet mit absoluter positionierung definiert wurden.
Das Problem wäre dann ja das Einfügen neuer Bilder.
Wäre aber schon froh wenn ich die Bilder einfach mit der Maus verschieben könnte...

Delphi-Quellcode:
 HTMLDocument2Ifc: IHTMLDocument2;
begin
  HTMLDocument2Ifc := WebBrowser1.Document as IHTMLDocument2;
  (WebBrowser1.Document as IHTMLDocument2).designMode := 'On';
  HTMLDocument2Ifc.ExecCommand('2D-Position', false, true);
  HTMLDocument2Ifc.ExecCommand('LiveResize', true, true);

APP 24. Jan 2004 15:50

Re: Bild im TWebbrowser Edit-Modus verschieben...
 
Hallo Horst,
ich habe hier ein HTML-Bookmarklet,
Code:
<HTML>
<SCRIPT LANGUAGE=javascript>
[color=red]var __w=document.body.contentEditable = 'true'; [/color]
document.designMode='on';
[color=red]void 0;[/color]
[color=red]if(__w!=null)document.write(__w);[/color]
</SCRIPT>
</HTML>
das z.B. mit der DP Webseite funktioniert, wo ich im Code zumindest keine DIV Tags entdecken konnte.
Ich bin kein HTML-Profi, aber vielleicht hilft es Dir weiter...

horst 24. Jan 2004 17:29

Re: Bild im TWebbrowser Edit-Modus verschieben...
 
Danke für deine Antwort,
Delphi-Quellcode:
(WebBrowser1.Document as IHTMLDocument2).designMode := 'On';
verwende ich ja schon.
Die DIV-Tags sind nur nötig wenn:
Delphi-Quellcode:
HTMLDocument2Ifc.ExecCommand('2D-Position', false, true);
benutzt wird.
Habe den Fehler gefunden...
hatte den EmbeddetWebbrowser benutzt, der kann das wohl irgendwie nicht.
Grüße Horst


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:29 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