$REGION funktioniert nicht bei [Attributen]

[Uwe Raabe]

Mit der Wrapper-Region kann ich es nachvollziehen. Leg doch bitte einen Bugreport im neuen Portal an.

[himitsu]

Zitat:

MachWas( TSuccessProc( @Success));

Und das Funktioniert so?

Diese Embedded-Prozeduren haben unter Umständen einen "unsichtbaren" ersten Parameter,
so ähnliche wie das "Self" bei Methoden, wo der Kontext zu den geteilten Variablen drin steht,
was dann nicht mit der Signatur deines TSuccessProc übereinstimmt.

Das sagt dir der Compiler aber auch, da er die Übergabe dieser Prozedur hier eigentlich nicht zulässt,
wenn du nicht grob fahrlässig und bösartig, durch dein rumgepointere, die Prüfungen aushebeln würdest.

Delphi-Quellcode:

function EineFunktion: String;
var
  xy: Integer;

  procedure Success;
  begin
    Result := DoSomething(xy);  // Zugriff auf XY und/oder Result
  end;
begin
  ...

[t2000]

Eingetragen:
https://embt.atlassian.net/servicede...tal/1/RSS-1442

[haentschman]

...ich habe keine Rechte und in meiner Liste ist aktuell der Letzte RSS-1441.

[t2000]

Zitat von haentschman:

...ich habe keine Rechte und in meiner Liste ist aktuell der Letzte RSS-1441.

Status ist erst "Ready for validation"

[haentschman]

Die RS-1441 ist auch "Ready for validation" ... den kann ich sehen.

[t2000]

Zitat von haentschman:

Die RS-1441 ist auch "Ready for validation" ... den kann ich sehen.

Hier ein Screenshot

[Uwe Raabe]

Du musst by Shared With noch Embarcadero Customers hinzufügen (sollte eigentlich per Default schon so sein)

[t2000]

@himitsu
Das ganze ist in einer TMS Web Core Umbebung. Es wird anschließend nach javascript übersetzt. Daher ist auch das [async] vorhanden.
Das Type-Casting ist nur, damit der Compiler nicht meckert. Die Adressierung geht nur so, damit es in javascript richtig funktioniert. (pas2js: https://wiki.freepascal.org/pas2js)
Aber der ganze Code sollte eigentlich kleinen Einfluss auf des $REGION haben, nach meiner Meinung.

Es ist jetzt nur unschön, aber natürlich nicht entscheidend für die Programmierung.