[fpc-pascal] Get RGB Color with TColor

How to get Red, Green, Blue value with TColor (TColorDialog object) in Delphi ? == 12y0 The ~'S'~ __ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com __

Re: [fpc-pascal] Bit manipulation

Florian Klaempfl wrote: Geno Roupsky wrote: it is as simple as this: function isset(value: dword; bit: byte): boolean; begin result := value and (1 shl pred(bit)) <> 0; end; Adding inline doesn't hurt speedwise ;) It is also assuming that bit counting starts at 1. I'd remove t

[fpc-pascal] FOSDEM 2006

Hi, is someone going to the FOSDEM 2006 this WE in Brussels ? http://www.fosdem.org/2006 kind regards, Den Jean ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Bit manipulation

Geno Roupsky wrote: > it is as simple as this: > > function isset(value: dword; bit: byte): boolean; > begin > result := value and (1 shl pred(bit)) <> 0; > end; Adding inline doesn't hurt speedwise ;) > > 2006/2/20, Pianoman <[EMAIL PROTECTED] >: > > Hi, I need

Re: [fpc-pascal] Bit manipulation

it is as simple as this: function isset(value: dword; bit: byte): boolean; begin   result := value and (1 shl pred(bit)) <> 0; end;2006/2/20, Pianoman <[EMAIL PROTECTED]>: Hi, I need to know how can I see whether a certain bit of byte/word/dword isset:  or not:function like this would be appreciat