HTML-Datei bearbeiten

[bixi400]

Hi!

Gibt es irgentwo ein Komponent zu downloaden das wie,
bei FrontPage die Seite anzeigt und man sie dann Bearbeiten kann?

[Alexander]

Kuck dir mal den Twebbrowser an, den kann man auf bearbeiten stellen. Das sollte so was in die Richtung sein...

[bixi400]

Mit welcher Funktion? :shock:

[mirage228]

Hi bixi400,

TWebBrowser findest du unter ActiveX.

Um eine URL bzw. eine lokale HTML-Datei aufzurufen, kannst du die Prozedur Navigate benutzen.

mfG
mirage228

[bixi400]

Bei mir ist er bei "Internet"

[mirage228]

Ja, es kann durchaus sein, dass er bei neueren Delphi-Versionen (ich hab "nur" Delphi 3 von 1997) unter "Internet" zu finden ist. Aber du hast es ja schließlich doch gefunden - und das ist ja die Hauptsache ;-)

mfG
mirage228

[Alexander]

editierbar machen mit

Delphi-Quellcode:

Webbrowser.DesignMode := ON

Habe es allerdings noch nie ausprobiert..

[Alexander]

Ich habe das jetzt selber gerade mal ausprobiert.
Das ganze ist nicht so leicht ^wie ich das dachte, hier mal ein Beispiel:

Delphi-Quellcode:

{ Ich musste unter Komponente -> ActiveX  die Active-X-Komponente MS HTML Object Library mit einbinden, damit ich die Unit einbinden kann... }
uses MSHTML_TLB;
{ ... }
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);
var
  WebBrowser: IWebBrowser;
begin
  WebBrowser:= pDisp as IWebBrowser;
  (WebBrowser.Document as IHTMLDocument2).DesignMode := 'On';
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 WebBrowser1.Navigate('http://www.alexander-franz.de');
end;

Sieht ganz nett aus im Editier-Modus ;-)

[bixi400]

:( Bei mir kommt der Fehler: Datei nicht gefunden: MSHTML_TLB.dcu
Kannst du mir die Datei vieleicht schicken?

[Alexander]

Ich musste wie gesagt unter Komponente Active-X importieren -> MS HTML Object Library mit einbinden, dann hat's geklappt.