SetGadgetColor geht auf einem Rechner, auf dem anderen nicht

[oldestim]

Hallo,
ich eröffne ein window mit einem ProcessBarGadget, und will die Farbe des Tickers anpassen mit SetGadgetColor. Funktioniert auf der stationären Maschine, aber auf meinem Laptop nicht. Darauf hin habe ich ein miniprogramm für den Laptop geschrieben, und damit funktionierts.
Kann aber nicht erkennen, warum im originalen Programm immer nur eine Farbe "hellgrün" kommt.
Auszug aus dem Originalprogramm:

Code: Alles auswählen

Global fillrot=240,fillgruen=240,fillblau=240
gwbreite=400,gwhoehe=150
LoadFont (1, "Arial", 14)
If Not OpenWindow(#GadgetWindow, 0, 0, gwbreite, gwhoehe, "Füllfarbe gesetzt")
   End
EndIf 

If CreateGadgetList(WindowID(#Gadgetwindow))
   ProgressBarGadget(1,  2,  2, gwbreite - 5, 12, 0, 255)
   SetGadgetState(1, 255)
   TrackBarGadget(   4,  2, 12, gwbreite - 5, 18, 0, 255)
   SetGadgetState(4,255)

   ProgressBarGadget(2,  2, 40, gwbreite - 5, 12, 0, 255)
   SetGadgetState(2, 255)
   TrackBarGadget(5,     2, 50, gwbreite - 5, 18, 0, 255)
   SetGadgetState(5,255)
 
 
   ProgressBarGadget(3,  2,  78, gwbreite - 5, 12, 0, 255)
   SetGadgetState(3, 255)
   TrackBarGadget(6,     2,  88, gwbreite - 5, 18, 0, 255)
   SetGadgetState(6,255)
  
   TextGadget(7,  5, 120, gwbreite -10, 25, "   Füllfarbe auf Hintergrund") 
   SetGadgetFont(7,FontID(1)) 
 EndIf 

   SetGadgetColor(1, #PB_Gadget_BackColor, RGB(255,255,255))
   SetGadgetColor(1, #PB_Gadget_FrontColor, RGB(Fillrot,0,0))

   SetGadgetColor(2, #PB_Gadget_BackColor, RGB(255,255,255))
   SetGadgetColor(2, #PB_Gadget_FrontColor, RGB(0,Fillgruen,0))

   SetGadgetColor(3, #PB_Gadget_BackColor, RGB(255,255,255))
   SetGadgetColor(3, #PB_Gadget_FrontColor, RGB(0,0,Fillblau))


SetGadgetColor(7, #PB_Gadget_BackColor,  RGB(50,50,50))
SetGadgetColor(7, #PB_Gadget_FrontColor, RGB(fillrot,fillgruen,Fillblau)) 

Delay (3000)
end

Was passt dem Laptop nicht? Danke für eure Mühe.
Wenn jemand das komplette Programm haben möchte, bitte melden.

Code-Tags gesetzt - Kaeru fecit

[ts-soft]

>> Was passt dem Laptop nicht?
Der XP-Style

[Fluid Byte]

RTFM!

Note: With activated Windows XP style the color settings will probably be ignored or overwritten by the style.

[oldestim]

Funktioniert! Und so schnelle Antworten um diese Uhrzeit. Ihr seid suess.