AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Memo / RichEdit for HTML export

Ein Thema von Youuuu · begonnen am 22. Apr 2021 · letzter Beitrag vom 27. Apr 2021
Antwort Antwort
Seite 1 von 2  1 2   
Youuuu

Registriert seit: 9. Okt 2016
44 Beiträge
 
#1

Memo / RichEdit for HTML export

  Alt 22. Apr 2021, 08:57
Hi,

ich suche eine Komponente, ähnlich dem OutlookEditor, in dem ich Text farblich gestalten und stylen kann (fett, usw.), welcher dann den gestalteten Text als HTML string ausgeben kann.

Gibt es solch eine Komponente bereits, gerne auch kostenpflichtige.


Grüße
  Mit Zitat antworten Zitat
TigerLilly

Registriert seit: 24. Mai 2017
Ort: Wien, Österreich
884 Beiträge
 
Delphi 10.3 Rio
 
#2

AW: Memo / RichEdit for HTML export

  Alt 22. Apr 2021, 09:49
HTML Components
https://www.delphihtmlcomponents.com/
  Mit Zitat antworten Zitat
Redeemer
Online

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
758 Beiträge
 
Delphi 2009 Professional
 
#3

AW: Memo / RichEdit for HTML export

  Alt 23. Apr 2021, 19:38
Ich hab mir kürzlich so ein Ding geschrieben, das fett/kursiv/unterstrichen/durchgestrichen, Farbe und Aufzählungen in einem Standard-TRichEdit von/zu HTML wandelt. Schriftgröße ist nicht drin, weil das bei Bildschirmskalierung komisch arbeitet, und ich das Feature nicht brauche.
Falls Bedarf besteht, kann ich es mal hochladen.
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat
Rollo62

Registriert seit: 15. Mär 2007
3.119 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Memo / RichEdit for HTML export

  Alt 23. Apr 2021, 20:34
Ich hab mir kürzlich so ein Ding geschrieben, ...
Ja das wollte ich auch noch, basierend auf diesem schönen TTextLayout für FMX, und mal austesten was da Alles geht.
Es ist aber wohl kein Editor, sondern nur die Ausgabe.

Ich fürchte das es sowas für VCL nicht gibt, beziehungsweise dass man das nicht irgendwie für FMX/VCL nutzen könnte.
Muss ich noch reinschauen, ist aber definitv auf der Todo Liste.
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.047 Beiträge
 
Delphi 10.3 Rio
 
#5

AW: Memo / RichEdit for HTML export

  Alt 26. Apr 2021, 18:22
Ich hab mir kürzlich so ein Ding geschrieben, das fett/kursiv/unterstrichen/durchgestrichen, Farbe und Aufzählungen in einem Standard-TRichEdit von/zu HTML wandelt. Schriftgröße ist nicht drin, weil das bei Bildschirmskalierung komisch arbeitet, und ich das Feature nicht brauche.
Falls Bedarf besteht, kann ich es mal hochladen.
Ich würde mich freuen da ich so etwas benötige: "Stelle ab charakter-position die Farbe auf clWasAnderes um" und ich mich mit RichEdit irgendwie zu doof anstelle. Falls Deines so etwas kann, bitte lade hoch, Dankeschön!
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Redeemer
Online

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
758 Beiträge
 
Delphi 2009 Professional
 
#6

AW: Memo / RichEdit for HTML export

  Alt 26. Apr 2021, 18:34
Geht das nicht so?
Delphi-Quellcode:
SelLength := High(Integer);
SelAttributes.Color := clIrgendwas;
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.047 Beiträge
 
Delphi 10.3 Rio
 
#7

AW: Memo / RichEdit for HTML export

  Alt 26. Apr 2021, 18:53
Ich bereite mal eine kleine Demo vor und erstelle neuen Thread um den hier nicht mit meinen problem zuzumüllen. Deinen Tipp verstehe ich so nicht ganz. @Redeemer
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
1.721 Beiträge
 
Delphi 7 Professional
 
#8

AW: Memo / RichEdit for HTML export

  Alt 26. Apr 2021, 19:18
SelLength := High(Integer); = Die Länge des auszuwählenden Textes wird auf die maximal mögliche Länge gesetzt. Das passiert ab der aktuellen Position.

Statt High(Integer) könnte man auch 2147483647 schreiben, muss aber, falls sich der Maximalwert für Integer mal ändern, den Quelltext anpassen

SelAttributes.Color := clIrgendwas; = Ab der aktuellen Position wird alles ab dieser Ausgewählte mit dem angegebene Attribut "gestaltet".

Das entspricht (für mein Verständnis) dem:
Zitat:
... da ich so etwas benötige: "Stelle ab charakter-position die Farbe auf clWasAnderes um"
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.047 Beiträge
 
Delphi 10.3 Rio
 
#9

AW: Memo / RichEdit for HTML export

  Alt 26. Apr 2021, 19:24
Mein Problem ist gelöst @Reedemer, habe es so versucht wie Du meintest, funzt!
Danke für den Nachtrag @Delphi.Narium!!
Delphi-Quellcode:
procedure TfrmMain.reMainChange(Sender: TObject); // reMain = RichEdit
var
  Len: Integer;
begin

  try
    Len := StrToInt(edtPosition.Text); // edtPosition = Editfeld mit Positionsangabe
  except
    Len := 25;
    edtPosition.Text := '25';
  end;

  if Length(reMain.Text) >= Len then
  begin
    reMain.SelStart := Len;
    reMain.SelLength := Length(reMain.Text);
    reMain.SelAttributes.Color := clGreen;
    reMain.SelStart := Length(reMain.Text);
    reMain.SelLength := 0;
  end;
end;
So nutze ich es nun, bestimmt nicht schön aber macht erstmal alles so wie ich es wollte. Flackert ganz schön dolle, mal sehen was ich da noch rausholen kann.
Es tut mir leid für diesen zwischen-request innerhalb eines fremd threads!
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
1.721 Beiträge
 
Delphi 7 Professional
 
#10

AW: Memo / RichEdit for HTML export

  Alt 26. Apr 2021, 19:48
Delphi-Quellcode:
procedure TfrmMain.reMainChange(Sender: TObject); // reMain = RichEdit
var
  Len : Integer;
  LenText : Integer;
begin
  Len := StrToIntDef(edtPosition.Text,25); // edtPosition = Editfeld mit Positionsangabe
  edtPosition.Text := IntToStr(Len);

  LenText := Length(reMain.Text); // Wird (eventuell) mehrfach benötigt, ermitteln wir nur einmal.
  if LenText >= Len then
  begin
    reMain.SelStart := Len;
    reMain.SelLength := LenText; // Soll wohl der restliche Text sein, dann geht auch:
    reMain.SelLength := High(Integer);
    reMain.SelAttributes.Color := clGreen;
    reMain.SelStart := LenText; // Soll wohl das Ende des Textes sein, dann geht auch diesmal:
    reMain.SelStart := High(Integer);
    reMain.SelLength := 0;
  end;
end;
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 +2. Es ist jetzt 21:56 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf