Call to all you one-liners !

[Mark Wieder]

Ken-

Saturday, June 26, 2010, 2:57:29 PM, you wrote:

> FYI: ugly though it is, here's the regex (it's long, so I broke it up into
> multiple statements):

That's a lot of work. I go for the easy way:

function isAColor pColor
  local tIsColor
  put true into tIsColor
  create invisible button
  try
    set the backcolor of the last button to pColor
  catch e
    put false into tIsColor
  end try
  delete the last button
  return tIsColor
end isAColor

-- 
-Mark Wieder
 mwieder at ahsoftware.net