Colors and image in a text-list

Hi rebolers, I want to change slider colors of a text-list with my own style like : tpl-base-skins: stylize/styles [ my-text-list: text-list font [ color: 0.128.128 size: 12 style: 'bold ] with [ image: img-slider <-- image for the slider colors: [180.180.180 70.130.180] <-- colors for the slider effect: [grid 1200x4 230.230.230] <-- effects for the text-list ] ] but there is no effect. How can I do with a style sheet ? --- Etienne

Hi, I repost my message. I expect an answer, if anyone can do it. Bye ---------- Message réacheminé ---------- Subject: Colors and image in a text-list Date: Wed, 4 Jul 2001 03:06:43 +0200 From: Etienne ALAURENT <[etienne--alaurent--free--fr]> Hi rebolers, I want to change slider colors of a text-list with my own style like : tpl-base-skins: stylize/styles [ my-text-list: text-list font [ color: 0.128.128 size: 12 style: 'bold ] with [ image: img-slider <-- image for the slider colors: [180.180.180 70.130.180] <-- colors for the slider effect: [grid 1200x4 230.230.230] <-- effects for the text-list ] ] but there is no effect. How can I do with a style sheet ? --- Etienne

Hi Etienne, It's not an easy task and it won't work as you expected (it was not designed to work like this). Firstly, you have to go deeper in the text-list structure to access the slider properties. You can access the slider object through the 'sld facet and the drag bar object with 'sld/dragger. Also, reading text-list source code can help you understand how it works : save %text-list.r get-style 'text-list save %slider.r get-style 'slider Secondly, the facets you're setting in the 'with block can be modified, at run-time, by the execution of the 'init block. There's 2 solutions : * Modify your facets after the view objects have been builded with the 'do keyword in your VID code. * Use the 'init-last facet from my modified 'layout (in the Win95-skin package) to keep your code at the stylesheet level. Here's a solution using 'do keyword : view layout [ styles tpl-base-skins tl: my-text-list 200x80 data ["one" "two" "three" "four" "five" "six" "seven"] do [ tl/sld/color: 70.130.180 tl/sld/dragger/color: 180.180.180 tl/sld/dragger/effect: [grid 1200x4 230.230.230] tl/sld/dragger/image: img-slider ] ] HTH, DocKimbel. Etienne ALAURENT wrote:

RE: [REBOL] Fwd: Colors and image in a text-list [etienne--alaurent--free--fr] wrote:

> Hi, > > I repost my message. > I expect an answer, if anyone can do it. >

Hello Etienne! On 08-Lug-01, you wrote: EA> I think I must develop my own text-list to get what I want. EA> But I have not enough time to do it now. I have a multi-column text list with slider and multi-selection, but I'm not sure it will be a lot easier to stylize. Currently, it allows you to: MultiCol-List columns 3 data [ ["col 1" "col 2" "col 3"] ["etc." "etc." "etc."] ] stylize [ Slider: ; your slider here Arrow-up: ; ... Arrow-down: ; ... ] Let me know if you are interested anyway, but keep in mind I have no docs yet. Regards, Gabriele. -- Gabriele Santilli <[giesse--writeme--com]> - Amigan - REBOL programmer Amiga Group Italia sez. L'Aquila -- http://www.amyresource.it/AGI/

Hi, Gabriele, Le lun, 09 jui 2001, vous avez écrit :

>Hello Etienne! >On 08-Lug-01, you wrote: >Let me know if you are interested anyway, but keep in mind I have >no docs yet.

Hi Nenad, Thank you for your help, but really, it doesn't work as I expected. I think I must develop my own text-list to get what I want. But I have not enough time to do it now. Ciao --- Etienne