HTML WYSIWYG Editor

[mjustin]

Zitat von machstuhl:

Nächstes Problem. Wenn ich im WebBrowser im EditMode bin und einen Zeilenumbruch mache, füllt der Webbrowser immer <p> anstatt <br> ein.

Hat irgendwer eine Idee wie ich die doofen Absätze beim Zeilenumbruch weg bekommen kann?

Was ist das konkrete Problem, der Zeilenabstand (der bei br und p unterschiedlich hoch ist)? Das kann man durch das Auftragen von etwas CSS beheben.

[machstuhl]

Zitat von mjustin:

Zitat von machstuhl:

Nächstes Problem. Wenn ich im WebBrowser im EditMode bin und einen Zeilenumbruch mache, füllt der Webbrowser immer <p> anstatt <br> ein.

Hat irgendwer eine Idee wie ich die doofen Absätze beim Zeilenumbruch weg bekommen kann?

Was ist das konkrete Problem, der Zeilenabstand (der bei br und p unterschiedlich hoch ist)? Das kann man durch das Auftragen von etwas CSS beheben.

In der Tat. Der Webbrowser soll ein WYSIWYG Editor für Endanwender werden damit diese sich ihre eigene EMail Signatur basteln können. Diese wird als String in der Datenbank gespeichert.
Wie stellst du dir das mit dem CSS vor? Kann man nicht irgendwie dem Webbrowser sagen, dass er <br>s anstatt <p>s einfügen soll?

edit: hab es... das Interface hat eine StyleSheet-Property. Wie praktisch
Danke!

[fs999]

...

[machstuhl]

Ich raffs doch nicht so ganz wie ich jetzt die <p> so umbiege, dass sie wie <br> angezeigt bekomme. Kann mir wer evtl mit nem Codebeispiel auf die Sprünge helfen?

Code:

procedure TFormHTMLText.FormShow(Sender: TObject);
const
  CSS = 'p {'#13#10
        + '    margin-top: 0;'#13#10
        + '    margin-bottom: 0;'#13#10
        + '}';
var
  StylesheetIndex: Integer;
  Stylesheet: IHTMLStyleSheet;
begin
  // Ein Navigate muss gemacht werden
  WebBrowser1.Navigate('about:blank');
  FDocInterface := (WebBrowser1.Document as IHTMLDocument2);
  LoadDocFromString(WebBrowser1, FHTMLString);

  // CSS StyleSheet laden
  StylesheetIndex := FDocInterFace.StyleSheets.Length;
  if stylesheetIndex > 31 then
     raise Exception.Create(Lan('Maximal 32 Stylesheets erlaubt.'));
  Stylesheet := FDocInterFace.createStyleSheet('', StylesheetIndex);
  Stylesheet.cssText := CSS;

  // String in Browser laden
  LoadDocFromString(WebBrowser1, FHTMLString);

  DesignMode(True);
end;

macht leider keine <br> aus den <p> (bzw stellt <p> als <br> dar).

[WM_CLOSE]

Das ist leider ein ganz typisches Verhalten, das auch Word und Konsorten zeigen.
Um nur einen Zeilenumbruch zu machen müsste man [Strg]+[Return] drücken.
Wie man dieses Verhalten unterdrückt, weiß ich auf Anhieb jetzt nicht.

[Dejan Vu]

Wieso ist das 'leider' ein 'ganz typisches Verhalten'? Das ist so, denn bei Texten geht es um Fließtext. Wenn Du das als 'Zeilen' ansehen willst, dann definiere den Absatzendeabstand entsprechend. Falls ein Absatz im Blocksatz formatiert werden soll, würde ein <br> dazu führen, das die Zeile auf die gesamte Breite gezogen wird und dagegen hat man i.A. etwas (einfach weil es Kacke aussieht).

[WM_CLOSE]

Ich meinte "leider", weil viele Leute schlicht [Return] drücken um eine neue Zeile zu machen. Auch mehrmal hintereinander, damit der Abstand größer wird. Und zwar vom unbedarften, briefschreibenden Opa bis zur erfahrenen Sekretärin. Eben weil es geht und meiner Erinnerung nach nie einen (sichtbaren) Unterschied machte.

Den Absatzabstand an den Zeilenabstand anzugleichen ist aber mehr als kurzsichtig, denn viele Empfänger haben E-Mail-Programme die nicht standardkonform arbeiten und z.B. kein CSS auswerten. Das würde vielleicht scheiße aussehen.

Ein Lösungsansatz wäre den Code so abzuändern, dass beim Drücken der [Return]-Taste der gleiche Ablauf erfolgt wie bei [Strg]+[Return].