<div>
simple project, add a single TButton &amp;&nbsp;a TFontDialog to form and add the following to the click event:<br />
<br />
procedure TForm1.Button1Click(Sender<wbr />: TObject);<br />
begin<br />
&nbsp; if &nbsp;FontDialog1.Execute then begin<br />
&nbsp; &nbsp; button1.Font.Name := FontDialog1.Font.Name;<br />
&nbsp; &nbsp; button1.Font.Color := FontDialog1.Font.Color;<br />
&nbsp; &nbsp; button1.Font.Size := &nbsp;FontDialog1.Font.Size;<br />
&nbsp; &nbsp; button1.Font.Style := FontDialog1.Font.Style;<br />
&nbsp; end;<br />
<br />
end;<br />
<br />
if you just want the FontDialog1 to return text strings instead of TFont properties, you can change them using :<br />
&nbsp; &nbsp;edit1.text := ColorToString(FontDialog1.<wbr />Font.Color<wbr />);<br />
etc... Im not sure what the others wold be though...<br />
<br />
hope this helps
</div>


simple project, add a single TButton & a TFontDialog to form and add the following to the click event:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if  FontDialog1.Execute then begin
    button1.Font.Name := FontDialog1.Font.Name;
    button1.Font.Color := FontDialog1.Font.Color;
    button1.Font.Size :=  FontDialog1.Font.Size;
    button1.Font.Style := FontDialog1.Font.Style;
  end;

end;

if you just want the FontDialog1 to return text strings instead of TFont properties, you can change them using :
   edit1.text := ColorToString(FontDialog1.Font.Color);
etc... Im not sure what the others wold be though...

hope this helps

<div>
Thats just what I needed to know, Thanks!
</div>


Thats just what I needed to know, Thanks!

<div>
<div class="content wysiwyg-content">
Hi,<br />
I'm quite new to Delphi so I expect this is a very n00b question, however how do you retrieve the Bold, Italic etc. settings with TFontStyle from a Font Dialog?<br />
I've tried Form1.TFontDialog1.Font.St<wbr />yle.fsItal<wbr />ic but that doesn't work :(<br />
Also is there a way of getting just the name of the style, like 'Bold' or 'Regular'?<br />
Thanks,<br />
James
</div>
</div>


Hi,
I'm quite new to Delphi so I expect this is a very n00b question, however how do you retrieve the Bold, Italic etc. settings with TFontStyle from a Font Dialog?
I've tried Form1.TFontDialog1.Font.Style.fsItalic but that doesn't work :(
Also is there a way of getting just the name of the style, like 'Bold' or 'Regular'?
Thanks,
James

Getting the font Style from TFontStyle

A font is a particular size, weight and style of a typeface. Each font is a matched set of type, one piece (called a "sort") for each glyph, and a typeface consists of a range of fonts that share an overall design. With the advent of digital typography, font is frequently synonymous with typeface, although the two terms do not necessarily mean the same thing. In particular, the use of "vector" or "outline" fonts means that different sizes of a typeface can be dynamically generated from one design. Each style may still be in a separate "font file" -- for instance, the typeface "Futura" may include the fonts "Futura roman", "Futura italic", "Futura bold" and "Futura extended" —- but the term "font" might be applied either to one of these alone or to the whole typeface.

Fonts Typography

Delphi is the most powerful Object Pascal IDE and component library for cross-platform Native App Development with flexible Cloud services and broad IoT connectivity. It provides powerful VCL controls for Windows 10 and enables FMX development for Windows, Mac and Mobile. Delphi is your choice for ultrafast Enterprise Strong Development™. Look for increased memory for large projects, extended multi-monitor support, improved Object Inspector and much more. Delphi is 5x faster for development and deployment across multiple desktop, mobile, cloud and database platforms including 32-bit and 64-bit Windows 10.