Can someone look at delphi's Graphics.pas file and go to the definition for TFontStyle. …
Well, I see why you are getting the error. But I don't know what the
{$NODEFINE...} is for.On 11-Aug-99 Shane Miller wrote 15 lines
Can someone look at delphi's Graphics.pas file and go to the definition for
TFontStyle. Please explain to me what the NODEFINE is doing there.
TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut);
{$NODEFINE TFONTSTYLE}
TFOntStyles = set of TFontStyle;
...
...
I'm trying to do this in code...
FontStyle : TFOnt Style;
...
..
FontStyle := [fsBold];
if something then FontStyle := FontStyle + [fsItalic];
FontStyle is just a single TFontStyle. You are trying to add an additional font style to it. But since it is not a set, you can't do that. If you want to add more font styles to it, then your FontStyle variable needs to be defined as the set as follows:
FontStyle: TFontStyles;
^This will allow you to add more font styles to the set.
Show quoted text 6 lines
but I keep getting...
Error: Opeerator is not overloaded.
Thoughts?
Some :)
Curtis