Progressbar colour
in [Visual Objects]
|
From: Stefan L on 31 Jul 2010 15:38 Hi Urs, Thanks for your input; it pointed me in the right direction to understand what happening. I dont know if its a bug in Windows or in VO. I have an absolutely original install of Windows XP (Swedish version) and the theme is standard Windows XP. Now, when I change the theme to Windows Classic it works out like you say, I get a red progressbar with black background as in the method PostInit. I will test this at work with an English version to see whats happens. I keep you posted. On 31 Juli, 21:03, "Urs Eggmann" <Urs.Eggm...(a)shinternet.ch> wrote: > Hi Stefan, > > Normally the progressbar is white and blue. If yours is green, I guess that > somewhere is a colorcondition that overrides your postinit. Your > PostInit-code works here without problems. > > regards > Urs > > "Stefan L" <s...(a)proffs.org> schrieb im Newsbeitragnews:c1f3af79-9e9e-40c5-996c-efeaca3e0391(a)w12g2000yqj.googlegroups.com... > > > Hi, > > I'm trying to change colour on a progressbas in a window but no > > sucess. > > > METHOD Init(oParent,uExtra) CLASS MFR > > .... > > oDCProgressBar1 := > > ProgressBar{SELF,ResourceID{MFR_PROGRESSBAR1,_GetInst()}} > > oDCProgressBar1:HyperLabel := > > HyperLabel{#ProgressBar1,NULL_STRING,NULL_STRING,NULL_STRING} > > ... > > > METHOD PostInit(oParent,uExtra) CLASS MFR > > .... > > SELF:oDCProgressBar1:BarColor := Color{255,0,0} // Red. > > SELF:oDCProgressBar1:BackgroundColor := Color{0,0,0} // Black > > > But the progressbar is still white background and green bar colour. I > > use XP and VO 2.8 SP3 > > > Stefan > >
From: Urs Eggmann on 31 Jul 2010 18:02 Hi Stefan, I'm working with XP, but with xp themes disabled (classical Win view) and the progressbar colors are black and red. When I switch to XP-themes enabled the color is green and white....??? Seems to be a Win-XP "bug or feature" regards Urs "Stefan L" <sl(a)proffs.org> schrieb im Newsbeitrag news:689a3d64-301c-42c8-bece-3390c8667e3f(a)t2g2000yqe.googlegroups.com... Hi Urs, Thanks for your input; it pointed me in the right direction to understand what happening. I don�t know if it�s a bug in Windows or in VO. I have an absolutely original install of Windows XP (Swedish version) and the theme is standard Windows XP. Now, when I change the theme to Windows Classic it works out like you say, I get a red progressbar with black background as in the method PostInit. I will test this at work with an English version to see what�s happens. I keep you posted. On 31 Juli, 21:03, "Urs Eggmann" <Urs.Eggm...(a)shinternet.ch> wrote: > Hi Stefan, > > Normally the progressbar is white and blue. If yours is green, I guess > that > somewhere is a colorcondition that overrides your postinit. Your > PostInit-code works here without problems. > > regards > Urs > > "Stefan L" <s...(a)proffs.org> schrieb im > Newsbeitragnews:c1f3af79-9e9e-40c5-996c-efeaca3e0391(a)w12g2000yqj.googlegroups.com... > > > Hi, > > I'm trying to change colour on a progressbas in a window but no > > sucess. > > > METHOD Init(oParent,uExtra) CLASS MFR > > .... > > oDCProgressBar1 := > > ProgressBar{SELF,ResourceID{MFR_PROGRESSBAR1,_GetInst()}} > > oDCProgressBar1:HyperLabel := > > HyperLabel{#ProgressBar1,NULL_STRING,NULL_STRING,NULL_STRING} > > ... > > > METHOD PostInit(oParent,uExtra) CLASS MFR > > .... > > SELF:oDCProgressBar1:BarColor := Color{255,0,0} // Red. > > SELF:oDCProgressBar1:BackgroundColor := Color{0,0,0} // Black > > > But the progressbar is still white background and green bar colour. I > > use XP and VO 2.8 SP3 > > > Stefan > >
From: Glen Townsley on 31 Jul 2010 19:12 Stephan, This is the way I do it: SendMessage( SELF:oDCPBarImport:Handle(), PBM_SETBARCOLOR, 0, LONG( _CAST, RGB( 255, 255, 0 ) ) ) HTH Glen Townsley "Stefan L" <sl(a)proffs.org> wrote in message news:c1f3af79-9e9e-40c5-996c-efeaca3e0391(a)w12g2000yqj.googlegroups.com... > Hi, > I'm trying to change colour on a progressbas in a window but no > sucess. > > METHOD Init(oParent,uExtra) CLASS MFR > .... > oDCProgressBar1 := > ProgressBar{SELF,ResourceID{MFR_PROGRESSBAR1,_GetInst()}} > oDCProgressBar1:HyperLabel := > HyperLabel{#ProgressBar1,NULL_STRING,NULL_STRING,NULL_STRING} > ... > > METHOD PostInit(oParent,uExtra) CLASS MFR > .... > SELF:oDCProgressBar1:BarColor := Color{255,0,0} // Red. > SELF:oDCProgressBar1:BackgroundColor := Color{0,0,0} // Black > > But the progressbar is still white background and green bar colour. I > use XP and VO 2.8 SP3 > > Stefan
From: Geoff Schaller on 1 Aug 2010 02:48 Stefan, You are falling into the realm of themes here. When themes are enabled and you supply the manifest then there are certain controls which then must obey the current theme. You can override some with owner draw styles or you can paint your own control with the Expose. This is quite a complex area. Geoff "Stefan L" <sl(a)proffs.org> wrote in message news:c1f3af79-9e9e-40c5-996c-efeaca3e0391(a)w12g2000yqj.googlegroups.com: > Hi, > I'm trying to change colour on a progressbas in a window but no > sucess. > > METHOD Init(oParent,uExtra) CLASS MFR > .... > oDCProgressBar1 := > ProgressBar{SELF,ResourceID{MFR_PROGRESSBAR1,_GetInst()}} > oDCProgressBar1:HyperLabel := > HyperLabel{#ProgressBar1,NULL_STRING,NULL_STRING,NULL_STRING} > ... > > METHOD PostInit(oParent,uExtra) CLASS MFR > .... > SELF:oDCProgressBar1:BarColor := Color{255,0,0} // Red. > SELF:oDCProgressBar1:BackgroundColor := Color{0,0,0} // Black > > But the progressbar is still white background and green bar colour. I > use XP and VO 2.8 SP3 > > Stefan
From: Stefan L on 1 Aug 2010 10:42
Glen, it gives exactly the same result as SELF:oDCProgressBar1:BarColor := Color{255,255,0} // Yellow. It works on theme Windows Classic but not theme XP. On 1 Aug, 01:12, "Glen Townsley" <glen_nospa...(a)pronamics.com.au> wrote: > Stephan, > > This is the way I do it: > > SendMessage( SELF:oDCPBarImport:Handle(), PBM_SETBARCOLOR, 0, LONG( _CAST, > RGB( 255, 255, 0 ) ) ) > > HTH > > Glen Townsley > > "Stefan L" <s...(a)proffs.org> wrote in message > > news:c1f3af79-9e9e-40c5-996c-efeaca3e0391(a)w12g2000yqj.googlegroups.com... > |