[lazarus] Pascal Question....

Shane Miller SMiller1 at stvgb.org
Wed Aug 11 15:57:13 EDT 1999


That was an error in the message I sent you.  It is actually
FontStyle : TFontStyles;

I sent another email in this regards with the actual code pasted into the email.
Shane


>>> "Shane Miller" <SMiller1 at stvgb.org> 08/11 12:44 PM >>>
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];

but I keep getting...
Error: Opeerator is not overloaded.


Thoughts?
Shane


_________________________________________________________________
     To unsubscribe: mail lazarus-request at miraclec.com with
                "unsubscribe" as the Subject
    archives at http://www.miraclec.com/list_archives/lazarus






More information about the Lazarus mailing list