RichEdit + FontDialog

[Moin]

Tach erst ma!

Ich würde gerne mit einem FontDialog den Markierten Text einer RichEdit
Formatieren, hab auch schon lange im Forum gesucht und viel gefunden.
Troz dem funzt es nich

Ich brauche Hilfeeee!!!

Delphi-Quellcode:

If FontDialog.Execute
      Then
         With Rich.SelAttributes do
          begin   Font  := FontDialog.Font;
                  Font.Style := FontDialog.Font.Style;
                  Font.Color:= FontDialog.Font.Color;

          end;

Das programm startet zwar, aber der markierte Text verändert sich nich

Danke im Vorraus

P.S.: ich komm mir wie n absoluter Anfänger vor

[Moin]

Ich noch ma,
Font.Name := FontDialog.Font.Name; funzt auch nich

Das einzige, das ich bisher hingegriegt habe ist "size"
ich will aber alle werte des Dialoges übernehmen;

[Mirilin]

Im Demo Ordner von Delphi hat es ein Demoprogramm über das RichEdit.


mfg Tobias

Edit : Hab mich geirrt, die Demo wird Dir wohl nicht helfen

[Keldorn]

Hallo

gugg doch einfach mal in die Onlinehilfe oder nutz die Codevervollständigung. Selattributes hat keine Font-Eigenschaft. du gibst nur den Namen, Size etc. an.

Delphi-Quellcode:

  if FontDialog1.Execute then
    begin
      RichEdit1.SelAttributes.Name := FontDialog1.Font.Name;
      ...
    end;

das was du da rumänderst, wenn du Font.??? verwendest wird wohl der Font der Form sein. Und wenn es mit der Größe geklappt hat, dann haben sich auch alle Schriftgrößen deiner ganzen Kompos auf der Form mitgeändert, wenn dur parentfont auf true stehen hast.

Mfg Frank

[Moin]

Danke für Eure Tips, ich habs zum Laufen gekriegt

[deinmeister]

oook bei mir ist es andersherum.... ich bekomm es mit der schriftart hin... aba size und fett,kursiv und unterstrichen geht nicht.... das nervt.... wie haste es denn da hin bekommen?

[Keldorn]

das geht doch genauso

Delphi-Quellcode:

  if FontDialog1.Execute then
    begin
      ...
      RichEdit1.SelAttributes.Style := FontDialog1.Font.Style;
      RichEdit1.SelAttributes.Size := FontDialog1.Font.size;

Mfg Frank