I want to draw a Bezier curve on the canvas using 2 end points and one control point (a quadratic Bézier curve).
What I came up until now is this:
Manipulate[
Graphics[{{Point[p0]}, {Point[p1]}, {Point[p2]}},
PlotRange -> 2, Frame -> True]
, {{p0, {1, 1}}, Locator}
, {{p2, {-1, -1}}, Locator}
, {{p1, {-1, 1}}, Locator}
]
I want to draw now the curve 
How do I that?