* CanvasGradient.AddColorStyp, canvasrenderingcontext.RoundRect

This commit is contained in:
Michaël Van Canneyt 2024-06-17 14:54:54 +02:00
parent 1e06d5e814
commit 462adf9277

View File

@ -2515,6 +2515,7 @@ Type
// Opaque objects // Opaque objects
TJSCanvasGradient = class external name 'CanvasGradient' (TJSObject) TJSCanvasGradient = class external name 'CanvasGradient' (TJSObject)
procedure addColorStop(offset : double; aColor : string);
end; end;
TJSCanvasPattern = class external name 'CanvasPattern' (TJSObject) TJSCanvasPattern = class external name 'CanvasPattern' (TJSObject)
@ -2644,6 +2645,7 @@ Type
procedure rect(x,y,awidth,aheight: TCanvasCoordType); overload; procedure rect(x,y,awidth,aheight: TCanvasCoordType); overload;
procedure restore; procedure restore;
procedure rotate(anAngle : double); procedure rotate(anAngle : double);
procedure roundRect(x,y,width,height : double; Radii : TJSArray);
procedure save; procedure save;
procedure scale(x,y : double); procedure scale(x,y : double);
procedure setLineDash(segments : TJSArray); overload; procedure setLineDash(segments : TJSArray); overload;