lcl/graphics.pp

     procedure PolyBezier(Points: PPoint; NumPts: Integer;
                          Filled: boolean = False;
                          Continuous: boolean = False); virtual; {$IFDEF
HasFPCanvas1}reintroduce;{$ENDIF}
     procedure PolyBezier(const Points: array of TPoint;
                          Filled: boolean = False;
                          Continuous: boolean = False); {$IFDEF
HasFPCanvas1}reintroduce;{$ENDIF}

def of Cotinuous is False! Seems it's wrong? Because Delphi don't have Continuous param at all and by default it paints continuous curve, ie it needs 4 points for the 1st curve and 3 points per next curves.

http://docwiki.embarcadero.com/Libraries/Rio/en/Vcl.Graphics.TCanvas.PolyBezier

so LCL must change def of Continuous to True?