In images like the one shown here, I would like to be able to pick an x,y coordinate and fill the bounded interior with a specified color. That functionality is well known in PhotoShop and GIMP, but I can't seem to find even a simple version of such code for Mathematica. I'm not expecting a great GUI - just some code that I can use and modify.
For[i = 1, i <= 100, i++,
t[i] = RandomReal[{0, 1}, {20, 2}]];
For[i = 1, i <= 100, i++,
g[i] = Graphics[{AbsoluteThickness[1],
BezierCurve[t[i], SplineClosed -> True,
SplineDegree -> RandomInteger[{4, 16}]]}, PlotRange -> {0, 1},
ImageSize -> {1000, 1000}]; Print[i];
Print[g[i]]]
Graphics
or anImage
object? $\endgroup$labels = MorphologicalComponents[g[1]] Colorize[labels]
$\endgroup$