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?


--
Regards,
Alexey

--
_______________________________________________
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Reply via email to