Wewnętrzna (pamięć) reprezentacja TProc i referencje w ogóle

Question

Czy ktoś tutaj wie, w jaki sposób Delphi reprezentuje odniesienie do procedury?

np

var 
    proc: TProc; 
... 
proc = procedure begin beep end; 

co mamy w "obrady"?

Wiem, że dla "zmiennej metody" reprezentacja pamięci wynosi 4 bajty dla "adresu procedury", po którym następują 4 bajty dla "adresu obiektu", ale dla "odniesienia do procedury" jest nieco inna i nie mogę do końca to.

Powodem, dla którego chcę, jest to, ponieważ mam jakiś staroświecki kod, który chcę, aby działał z referencjami.

Czy ktoś wie coś na ten temat?

Answer 1

Odwołania do metod są implementowane jako interfejs w stylu COM za pomocą jednej metody o nazwie Invoke, która ma ten sam podpis, co odwołanie do metody.

Więc TProc wygląda następująco:

type 
    TProc = interface(IInterface) // so inherits QI, AddRef, Release 
    procedure Invoke; 
    end; 

Jest to ważne pytanie zadać, jak Delphi ma współdziałanie z produktem C++. Korzystając z wcześniej istniejącego typu i idiomu zliczanego odsyłającego (reguły życia COM), możliwe jest współdziałanie z C++ na poziomie odniesienia metody.

Metody anonimowe generują ukrytą klasę, która implementuje interfejs izomorficzny do interfejsu odniesienia metody, tj. O dokładnie tym samym kształcie, ale nie o tej samej symbolicznej tożsamości. Ukryta klasa nie implementuje bezpośrednio interfejsu odnośnika metod, ponieważ może zaistnieć konieczność implementacji interfejsu wiele razy (pojedynczy blok może zawierać wiele anonimowych metod przypisanych do lokalizacji tego samego typu odwołania do metody).