Methodenzeiger nach pointer konvertieren? [done]

maximus · Beiträge: 896 Win XP, Suse 8.1 Delphi 4/7/8 alles prof

hi.

ich würd gern einen methoden zeiger zu einem pointer machen! Mir ist klar, dass er bereits ei pointer ist, aber die benutzung ist doch sehr eingeschränkt, weil der compiler immer denkt man wollte die methode ausführen.

Hab ihr da ne idee!

cu,

_________________
mfg.
mâximôv

maximus · Beiträge: 896 Win XP, Suse 8.1 Delphi 4/7/8 alles prof

Wäre das richtig?:

markieren

Delphi-Quelltext

1:
2:
3:
4:

    function MethodeToPtr(var x):pointer;
    begin
      result := pointer(x);
    end;

cu,

_________________
mfg.
mâximôv

AndyB · Beiträge: 1173 Erhaltene Danke: 14 RAD Studio XE2

Dann stelle dem Methodenzeiger doch einfach ein @ voran:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

var ev: TNotifyEvent;

ev := MyObj.OnClick;

if @ev <> nil then ...
// ist dasselbe wie:
if Assigned(ev) then ...

_________________
Ist Zeit wirklich Geld?

maximus · Beiträge: 896 Win XP, Suse 8.1 Delphi 4/7/8 alles prof

bist du dir sicher, dass das nicht ein schnellschuss war?

wenn du @ev abfragst, dann erhälst du IMAO die addresse von ev

...nicht aber die addresse des events, also den wert von ev!

:?:

PS: es soll konvertiert werden nicht referenziert etc.

_________________
mfg.
mâximôv

AndyB · Beiträge: 1173 Erhaltene Danke: 14 RAD Studio XE2

maximus hat folgendes geschrieben:

bist du dir sicher, dass das nicht ein schnellschuss war?

Hast du es ausprobiert?

Delphi unterscheidet zwischen Prozeduralen/Methodenzeiger-Variablen und "normalen" Variablen beim @-Operator.

Bsp:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

var
  ev: TNotifyEvent;
begin
  ev := nil;
  if @ev = nil then ShowMessage('War doch nicht die Adresse von ev.');
end;

Du wirst mir wohl zustimmen, das ev nicht an der Speicheradresse 0 (=nil) liegt. Wieso kommt dann aber diese MessageBox. :roll:

_________________
Ist Zeit wirklich Geld?

maximus · Beiträge: 896 Win XP, Suse 8.1 Delphi 4/7/8 alles prof

Ich werde es dir ungetestet glauben..kann ja keiner ahnen das die eine sonderfall unterscheidung machen

irgendwie inkonsequent! Aber soll mir recht sein, da das die sache natürlich sehr vereinfacht.

Vielen dank fürs stopfen meiner wissenslücke, hatte mich immer drüber geärgert

cu,

_________________
mfg.
mâximôv

AndyB · Beiträge: 1173 Erhaltene Danke: 14 RAD Studio XE2

maximus hat folgendes geschrieben:

kann ja keiner ahnen das die eine sonderfall unterscheidung machen

irgendwie inkonsequent!

Wenn man es genau betrachtet ist es eigentlich nicht inkonsequent. Ein Methodenzeiger wird wie eine Funktion benutzt, also sollten auch die Operatoren für Prozeduren gelten. Und da @ bei einer Funktion die Adresse der Prozedur liefert, liefert auch @Methode die Adresse der Methode.

_________________
Ist Zeit wirklich Geld?

maximus · Beiträge: 896 Win XP, Suse 8.1 Delphi 4/7/8 alles prof

Wenn mans weiss und von der seite betrachtet, wirds schon logischer :wink:

...sehr lässig. Einfach @ und fertig!

_________________
mfg.
mâximôv

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme