Wie ermittelt man die Adresse der Instanz einer Komponente?

[Dalai]

abc ist die Klasse, du willst aber die Instanz bzw. dessen Adresse und für eine solche braucht man eine Variable der entsprechenden Klasse.

Delphi-Quellcode:

type
   abc = class(tComponent)
     private
       i: Integer;
       ...
   end;

procedure A;
var
  Labc: abc;
begin
  DoSomething(@Labc);
end;

Grüße
Dalai

[himitsu]

@Self geht,
wobei das natürlich schwachsinn ist, da du "SO" nur die Adresse der Variable bekommst, in welcher das Self aktuell gespeichert ist.

Normal ist das aber eigentlich keine Speicheradresse, sondern das EAX-Register, beim Start der Methode, wobei es dann oft in den Stack geschoben wird
und du dann den Zeiger auf eine Stelle im Stack bekommst. Und diese Adresse wird nach Ende der Methode selbstverständlich ungültig.




Warum ein besch**** Zeiger, anstatt einer Variable vom Instanztyp direkt?

Objekte sind bereits "Zeiger", welche "intern" auf ihren eigenen Speicher zeigen.



Hmmmmm:
Abgesehn davon hat es irgendwie keinen verständlichen Sinn, innerhalb des eigenen Objektes einen Zeiger auf sich selbst zu haben, wo man doch sowieso direkt auf sich selbst zugreifen kann.

Wozu soll das Ganze also eigentlich dienen?

[Andreas13]

Vielleicht hilft es Dir hier weiter: https://www.delphi-treff.de/object-p...ethodenzeiger/

Du brauchst keinen einfachen Pointer, sondern einen Methoden-Pointer = "eine Referenz auf eine Methode einer Instanz einer Klasse". Und das ist ein Record aus u. a. 2 Pointern:

Delphi-Quellcode:

TMethod = record
    Code, Data: Pointer;
  public
   ...
  end;