Hi Jaap,
I believe this will do the trick for you:
Code:
(progn
(ELAN::SET_PART_COLOR (OLI::SD-INQ-CURR-PART) :RGB
(FRAME2::GPNT3D (LISP::RANDOM 1.0) (LISP::RANDOM 1.0)
(LISP::RANDOM 1.0))
:DONE)
(update_screen))
You just need to tell OSM to update the screen (which clicking in the viewport will also do).
The other thing to note is that when you assign code to a button, it expects a single command, which is why the "progn" statement (along with its closing parenthesis) is needed -- the (progn ...) statement allows your color randomizer and the update_screen call to be passed as a single command to the customization interface. (I know you're aware of what (progn ...) does, but maybe this will help some others who are just getting started!)
I hope this helps!
Merry Christmas and Happy New Year everyone!
andy