Plot VoronoiDiagram using Graphics in Mathematica

Question

Completing questions on how to plot a ConvexHull or a DelaunayTriangulation using Graphics in Mathematica,

I would now like to plot the VoronoiDiagram within Graphics.

Considering :

Needs["ComputationalGeometry`"]
pts = RandomReal[{0, 10}, {60, 2}];
vdpts=VoronoiDiagram[pts]

Answer 1

How about

Needs["ComputationalGeometry`"]
pts = RandomReal[{0, 10}, {10, 2}]
DiagramPlot[pts]

or am I missing your point?