[futurebasic] Re: [FB] Colour Text in Lists

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : August 2008 : Group Archive : Group : All Groups

From: Brian Stevens <bstevens33@...>
Date: Thu, 21 Aug 2008 18:46:06 -0700
On Aug 21, 2008, at 9:30 AM, Eugen Rosu wrote:

>
> Hi all,
>
> I want to colour some text in a column of a Bernie's list (ex.: http://freegroups.net/groups/futurebasic/0::45629read.html) 
> .

Bad link, so the rest is a semi-guess.

>
> I tried (for red colour) :
>
> dim as RGBColor rgb
> rgb.red = 65535 : rgb.green = 0 : rgb.blue = 0
> fn DBDataSetRGB ( browser, _cBrowserC001, itemID, rgb )

I'm guessing here you are using some flavor of Bernie's DBData.incl.  
If that isn't true than ignore this.

The  DBDataSetRGB  fn accepts a pointer to an RGB structure. FB passes  
a pointer for automatically in this case but if this is FBtoC it  
couldn't hurt to explicitly ( i.e.  @rgb ) pass the pointer. Haven't  
tried it, so I don't know if that makes a difference. The other things  
to check are:
(1) do I have a valid browers ref ?
(2) am I using the correct property ID  and itemID ?


>
> Also, I'd like to change the syle of the text (to make it italic or  
> bold, etc.)
> How can I do this ?


Basically, this is the same mechanism for most carbon calls:
(1)  Set a ControlFontStyleRec  to the font, style and size required -  
plus set the flags to allow font mask, size mask, face mask
(2) Call SetControlData with the browser ref as the control ref......

something like.......

dim as ControlFontStyleRec   cfs

cfs.flags = _kControlUseFontMask _kControlUseSizeMask  
_kControlUseFaceMask
cfs.font  = yourFont
cfs.size  = yourSize
cfs.style = yourStyle

fn SetControlData( browser, 0, _kControlFontStyleTag,  
sizeof(ControlFontStyleRec), @cfs )


Brian S