AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi TFontDialog: wie einzelne Style-Typen extrahieren ?

TFontDialog: wie einzelne Style-Typen extrahieren ?

Ein Thema von HannsW · begonnen am 24. Jan 2010 · letzter Beitrag vom 25. Jan 2010
Antwort Antwort
HannsW

Registriert seit: 6. Jan 2010
26 Beiträge
 
#1

TFontDialog: wie einzelne Style-Typen extrahieren ?

  Alt 24. Jan 2010, 17:52
Guten Abend.
Bevor ich einen Fontdialog aufrufe setze ich u.a. auch den Style
Delphi-Quellcode:
     FontDialog1.Font.Style:= [];
     if fsBold1 then
          FontDialog1.Font.Style:= FontDialog1.Font.Style + [fsBold];
     if fsItalic1 then
          FontDialog1.Font.Style:= FontDialog1.Font.Style + [fsItalic];
      ...
Wie kann ich jetzt nach Execute feststellen, welche Style-Art gesetzt wurde?
Delphi-Quellcode:
    if FontDialog1.Execute then begin
        FontName1 := FontDialog1.Font.Name;
        fontSize1 := FontDialog1.Font.Size;
        fsBold1 := ???????
Danke Hanns
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.987 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: TFontDialog: wie einzelne Style-Typen extrahieren ?

  Alt 24. Jan 2010, 18:47
Hallo,

das geht beispielsweise so:

fsBold1 := fsBold in FontDialog1.Font.Style; // falls fsBold1 ein Boolean ist Analog geht es mit den anderen Styles. Im folgenden Beispiel als if-Anweisung:

Delphi-Quellcode:
if fsBold in FontDialog1.Font.Style then
  ShowMessage('bold');

if fsItalic in FontDialog1.Font.Style then
  ShowMessage('italic');

if fsUnderline in FontDialog1.Font.Style then
  ShowMessage('underline');

if fsStrikeOut in FontDialog1.Font.Style then
  ShowMessage('strike out');
Grüße, Matze
  Mit Zitat antworten Zitat
HannsW

Registriert seit: 6. Jan 2010
26 Beiträge
 
#3

Re: TFontDialog: wie einzelne Style-Typen extrahieren ?

  Alt 25. Jan 2010, 02:14
Danke Matze,
das Wars

happy Hanns
  Mit Zitat antworten Zitat
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 +1. Es ist jetzt 03:54 Uhr.
Powered by vBulletin® Copyright ©2000 - 2022, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf