System.PixelColor

It just won't work for me :(

from WinCustomize Forums

I've been looking into System.PixelColor option and I just can't make it work correctly.

This is the script I'm using:

 

Code: vb
  2. hexcolor = Hex(System.PixelColor(System.CursorX, System.CursorY))
  4. red = Right(hexcolor, 2)
  5. green = Mid(hexcolor, 2,2)
  6. blue = Left(hexcolor, 2)
  8.     'I added these Ifs because sometimes red, green or blue return "" and that doesn't really work
  10.     If red="" Then
  11.         red=0
  12.     End If
  13.     If green="" Then
  14.         green=0
  15.     End If
  16.     If blue="" Then
  17.         blue=0
  18.     End If
  20. DesktopX.Object("-1/-1").TextColor = RGB(CLng("&H" & red),CLng("&H" & green),CLng("&H" & blue))

(it is basically just a bit retouched rudamentary script from https://www.stardock.com/products/desktopx/documentation/scripting/system_namespace.asp)

It's on a timer so it loops and it actually changes number values but they are not correct. If anyone has any idea why this won't work please, don't be shy :pout:

desktopx
4,729 views 3 replies
Reply #1 from WinCustomize Forums Top

Hi, you don't need to convert it to and from hex, just using

 

Code: vbscript
  1. object.textcolor = system.PixelColor(system.CursorX,system.cursorY)

 

works  fine :)

 

Unless you're trying to do something else I'm not aware of.

Reply #2 from WinCustomize Forums Top

this was the script in the "color picker" widget that comes with DX (or did)

 

Code: vbscript
  3.    x = System.CursorX
  4.    y = System.CursorY
  5.    color = System.PixelColor(x, y)
  6.    hexcolor = Hex(color)
  7.    red = Right(hexcolor, 2)
  8.    green = Right(left(hexcolor, 4), 2)
  9.    blue = Left(hexcolor, 2)
  10.    Object.Text = CStr(CLng("&H" & red)) & ", " & CStr(CLng("&H" & green)) & ", " & CStr(CLng("&H" & blue))
  11.    DesktopX.Object("dx_color_sample").TextColor = RGB(CLng("&H" & red),CLng("&H" & green),CLng("&H" & blue))

In the above example the name of the object is "dx_color_sample"

---

Im curious how this is working:

Code: vbscript
  1. DesktopX.<span style="color: #0000ff;">Object</span>("<span style="color: #8b0000;">-1/-1</span>").TextColor

the "-1/-1" SHOULD be the NAME of the object you want to change the text color of, did you name the object -1/-1?

 

 

+1 Loading…
Star Control: Origins
Reply #3 from WinCustomize Forums Top

Yeah I named it -1/-1 since I'll be using a multitude of little objects and I decided to name them after their relative coordinates.

 

Just C/P your example and it works like it should THANKS A BUNCH!

10 internets to you, ehm I mean +1 karma :-"

 

@Tiggz

I didn't know that works too, unfortunately I need R G and B values separated. Thanks for your reply tho :)