Hi Thomas > If SpBtnBold.Down then Image.Canvas.Font.Style := fsBold ; > > When doing a syntax check I get this error message: > > [Error] GraphWin.pas(356): Incompatible types: 'TFontStyles' and > 'TFontStyle' > > What am I doing wrong?
TFontStyles is a set of TFontStyle, so you need to express it as a set. i.e.[fsBold] rather than fsBold. To add Bold without changing any other styles, I use Image.Canvas.Font.Style := Image.Canvas.Font.Style or [fsBold] to unbold without changing any other styles, I use Image.Canvas.Font.Style := Image.Canvas.Font.Style and not [fsBold] Henry Bartlett email: hambar at microtech dot com dot au _______________________________________________ Delphi mailing list -> [email protected] http://www.elists.org/mailman/listinfo/delphi
