[lazarus] Pascal error message

[Peter Vreman]

Please send me code that i can compile directly to check for the error
message.

Peter


On Wed, 11 Aug 1999, Shane Miller wrote:

> Here's the actual code I am having trouble with....
> 
> procedure THighLightAttributes.SetStyleFromInt(const Value: integer); 
> begin 
>   if (Value and $1)  = 0 then  Style:= [] 
> else Style:= [fsBold]; 
>   if (Value and $2) <> 0 then Style := Style + [fsItalic]; 
> 
>   if Value and $4 <> 0 then Style:= Style+[fsUnderline]; 
>   if Value and $8 <> 0 then Style:= Style+[fsStrikeout]; 
> end; 
> 
> Style is a TFontStyles (defined in Graphics.pp)
> Any reason I am getting 
> Error: Operator is nopt overloaded
> on the line where is adds [fsItalic] to style?
> 
> Shane
> 
> _________________________________________________________________
>      To unsubscribe: mail lazarus-request at miraclec.com with
>                 "unsubscribe" as the Subject
>     archives at http://www.miraclec.com/list_archives/lazarus
>