Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   "reference to procedure" vs. "procedure" (https://www.delphipraxis.net/195042-reference-procedure-vs-procedure.html)

jaenicke 30. Jan 2018 07:57

AW: "reference to procedure" vs. "procedure"
 
Zitat:

Zitat von freimatz (Beitrag 1392504)
Gibt es eigentlich bei dieser Sache einen Unterschied zwischen einer klassischen Prozedur und einer anonymen Methode? Bei einer Klassenmethode ist es mir klar, da wird ja intern noch Self als Parameter mit übergeben. Aber sind die anderen Fälle nicht gleich - zumindest vom aufruf. Ein Stück Code liegt im Speicher und wird aufgerufen.

So einfach ist es nicht. Du vergisst, dass da auch noch die Werte im Scope vorhanden sein müssen. Beispiel:
Delphi-Quellcode:
procedure Blub;
var
  a: Integer;
begin
  a := 42;
  TGlobalBadness.Add(procedure
    begin
      Foo(a);
    end);
Dann brauchst du in dem Aufruf der anonymen Funktion ja den Variableninhalt aus dem Scope zu dem Zeitpunkt als die anonyme Funktion hinzugefügt wurde. Das meinte himitsu oben. Intern wird da ein Interface draus, in dem auch dieser Scope abgebildet ist.

Stevie 30. Jan 2018 11:29

AW: "reference to procedure" vs. "procedure"
 
Zitat:

Zitat von freimatz (Beitrag 1392504)
Gibt es eigentlich bei dieser Sache einen Unterschied zwischen einer klassischen Prozedur und einer anonymen Methode? Bei einer Klassenmethode ist es mir klar, da wird ja intern noch Self als Parameter mit übergeben. Aber sind die anderen Fälle nicht gleich - zumindest vom aufruf. Ein Stück Code liegt im Speicher und wird aufgerufen. Dass die anonyme Methode keinen Namen (oder nur einen internen generierten) Namen hat kann doch hier keinen Unterschied machen. Oder?

Siehe mein Kommentar auf G+

freimatz 30. Jan 2018 15:08

AW: "reference to procedure" vs. "procedure"
 
Danke


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:53 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz