pas2js - Record ähnliches an Function übergeben.

[Mathias]

Ich habe folgende Zeile in JavaScript.

Code: Alles auswählen

  gl = canvas.getContext("webgl", {depth:true, antialias:true, alpha: false});

Wie löse ich dies in pas2js ?
Es geht mit um den Teil in den {}.

Soweit bin ich unterdessen gekommen

Code: Alles auswählen

var
  gl: TJSWebGLRenderingContext = nil;
  cA: TJSObject = nil;
 begin
    gl := TJSWebGLRenderingContext(canvas.getContext('webgl2', cA));

Einen gewöhnlichen Context ohne Parameter kann ich erstellen, das nil kann ich sogar ganz weg lassen.

Code: Alles auswählen

    gl := TJSWebGLRenderingContext(canvas.getContext('webgl2', nil));

[Mathias]

Mit etwas rumtüffteln bin ich auf folgendes gestossen:

Code: Alles auswählen

  var
    ButtonLeft, Panel, ButtonRight, ButtonTop, ButtonBottom: TJSElement;
    cA: TJSObject;
 begin
    cA := TJSObject.new;
    cA['depth'] := False;
    cA['antialias'] := True;
    cA['alpha'] := False;

    gl := TJSWebGLRenderingContext(canvas.getContext('webgl2', cA));

Sowas kurliges habe ich bis jetzt in Pascal nie gesehen.

[PascalDragon]

Sowas kurliges habe ich bis jetzt in Pascal nie gesehen.

Siehe hier.

[Mathias]

Sowas kurliges habe ich bis jetzt in Pascal nie gesehen.

Siehe hier.

Danke
Ein saubere Lösung.
Ich dachte mit fast, das es nicht so ein Geflicke braucht.

Jetzt sieht es recht sauber aus.

Code: Alles auswählen

    gl := TJSWebGLRenderingContext(canvas.getContext('webgl2', new(['depth', True, 'antialias', True, 'alpha', False])));

Alternativ geht noch folgendes:

Code: Alles auswählen

  var
    cA: TJSObject;
begin
    ...
    cA := new(['depth', True, 'antialias', True, 'alpha', False]);
    gl := TJSWebGLRenderingContext(canvas.getContext('webgl2', cA));