*moep*

Hiho ihr Delphi-Asse,

ich habe mal eine Frage, warum folgendes nicht funktioniert:



Das ganze ist etwas zusammengefasst auf das Wesentliche. Kompilieren tut es, aber sobald ich die Callback-Funktion rufe, gibts nen Speicheradressenfehler.
Es funktioniert, wenn ich das lineFn als TLineCallback (also nicht die Pointer-Variante) überall nehme und bei dem if dann (if (@lineFn <> nil) benutze.


Also von daher hab ich schon nen Workaround. Aber trotzdem die Frage: warum geht das erste nicht???

_________________
__________
"C++ is the best language for garbage collection principally because it creates less garbage." Bjarne Stroustrup

Weil du mit

schon eine art Pointer deklarierst. Ich weiss nicht, was Delphi dann genau tut, aber das reicht eigentlich aus.

Gruß Lord Horazont

_________________
If you find any deadlinks, please send me a notification – Wenn du tote Links findest, sende mir eine Benachrichtigung.
current projects: ManiacLab; aioxmpp
zombofant network • my photostream
„Writing code is like writing poetry“ - source unknown

„Give a man a fish, and you feed him for a day. Teach a man to fish and you feed him for a lifetime. “ ~ A Chinese Proverb

Das ist nicht nur eine Art Pointer. Das ist sogar Einer.

In C++ wäre das folgendes





Ist ein Pointer auf einen Pointertyp (TLineCallback). Solltest du nur machen, wenn du diesen als optionalen Parameter (Referenz) einer Methode machen willst. Also, dass die Methode diesen Parameter setzen kann. Denn eigentlich musst du bei so etwas dann auch einen Pointer auf eine Variable vom Typen TLineCallback übergeben. Ein var parameter geht dafür aber auch. Dann hat man mit dem Pointer nicht direkt etwas zu tun.


PS: Achte bitte auf eventuelle Aufrufkonventionen. Solange es nur innerhalb von einer Pascalanwendung benutzt wird ist es unkritisch. Ansonsten lieber immer eine angeben.

PPS: Achja. Ich hab das Thema mal hierhin verschoben.

Einen Hinweis auf die Zeigernatur einer Callback-Funktion/Prozedur/Methode fiefert auch die Tatsache, dass man bei Freepascal bei der Zuweisung auf eine Variable ein @voranstellen muss (Ausser im Delphi-Kompatibilitätsmodus). Delph erkennt, dass man an dieser Stelle eigentlich einen Zeiger auf die Methode übergeben will, FreePascal hält sich hier enger an die DelphiLanguage.
Beispiel:

_________________
Manchmal sehen Dinge, die wie Dinge aussehen wollen, mehr wie Dinge aus, als Dinge.
<Esmerelda Wetterwax>
Es kann vorkommen, dass die Nachkommen trotz Abkommen mit ihrem Einkommen nicht auskommen und umkommen.

Ah ok danke.
Wenn das schon normal ein Zeiger ist, warum kann ich es dann nicht auf nil testen? Weil das war das eigentliche Probleme. Ich will testen, ob wirklich eine Callback-Funktion gesetzt ist. Und wenn ich das TLineCallback nehme, dann gibt das einen Compilefehler. Daher kam ich erst auf die "Idee" mit dem ^TLineCallback.

@Lossy: danke für den Hinweis, aber ich nutze das nur Delphi-Intern. Geht nicht über eine DLL oder sowas.


MfG Pellaeon

_________________
__________
"C++ is the best language for garbage collection principally because it creates less garbage." Bjarne Stroustrup

so müsste es eigentlich gehen :



das würde die procedure ausführen wenn eine zugewiesen ist.... hoffe es hilft dir weiter

Zum Überprüfen auf nil gibt es verschiedene Wege. Entweder über die "Methode" Assigned oder über den @Operator / Methode Addr. All die Sachen werden vom Compiler in inline code verwandelt und sind wie normale abfragen. In deinem Fall handelt es sich um eine Variable auf eine Methode. Beim Zuweisen einer solchen Variable kann man in Delphi ohne @Arbeiten. Beim Auslesen ohne Operator versucht er aber die Methode auszuführen was dann zu einem Kompilerfehler führen kann. Bei Methoden ohne Parameter und mit einem Pointer als Rückgabewert lässt es sich aber übersetzen. Dann wird aber die Methode ausgeführt.

Normal gibt @ oder Addr die Adresse einer Variable zurück. Bei Funktionspointern liefert er dir aber die Adresse der enthaltenen Funktion zurück. Und nicht wie man erwarten könnte die Adresse der Variable. Die bekommt er erst, wenn man 2 Mal die Adresse erfragt. Also @@ oder sonst welcher Kombination mit Addr.

[edit] Man bin ich heute wieder langsam. Aber evtl. hilft es ja ein bisschen fürs Verständniss.

Um mal bei Deinem Beispiel zu bleiben:


@linefn ist IMMER <>Nil, denn das ist je die Adresse, wo Dein Zeiger gespeichert ist. Da dies aber ein Member Deiner Klasse ist, wird dafür schon im Konstruktor Speicher angelegt und zugewiesen (i.d.R.: über Offsetwerte aus der Typbeschreibung, führt hier aber zu weit). Du willst aber wissen, ob in Deinem Member ein sinnvoller Wert drinsteht, Dich interessiert der Inhalt des Zeigers.
Delphi ist bei Methodenzeigern ähnlich wie bei Instanzzeigern schlau genug, bei Bedarf selber zu dereferenzieren.

_________________
Manchmal sehen Dinge, die wie Dinge aussehen wollen, mehr wie Dinge aus, als Dinge.
<Esmerelda Wetterwax>
Es kann vorkommen, dass die Nachkommen trotz Abkommen mit ihrem Einkommen nicht auskommen und umkommen.

Genau das habe ich ja gedacht, das ist aber falsch^^. Wo bei dir steht "hier liegt der Fehler", so ist es korrekt und wo bei dir richtig steht, das gibt einen Compilefehler^^
Begründung siehe der Post von Lossy Man lernt halt nie aus^^ Thx


MfG Pellaeon

_________________
__________
"C++ is the best language for garbage collection principally because it creates less garbage." Bjarne Stroustrup

Also ich programmier jetzt schon Jahre mit Delphi und nutze intensiv Callbacks, sowohl Procedure(), als auch Proccedure() of Object und habe noch NIE ein @ einsetzen müssen (ausser bei Systemrufen wie SetWindowLong, aber das ist ein anderes Pflaster). Der Fehler muss woanders liegen. Wie hast Du denn Dein lineFn deklariert?

[edit] falls Du mit FreePascal arbeitest, musst Du ggf. den @-Operator doch einsetzen, ähnlich wie bei der Zuweisung. Kann ich aber jetzt nicht nachvollziehen, weil ich kein FreePascal dahab.[/edit]

_________________
Manchmal sehen Dinge, die wie Dinge aussehen wollen, mehr wie Dinge aus, als Dinge.
<Esmerelda Wetterwax>
Es kann vorkommen, dass die Nachkommen trotz Abkommen mit ihrem Einkommen nicht auskommen und umkommen.

Sidorin du hast in so fern recht, wenn du sagst, dass man in Delphi für Funktionspointer auch ohne @Operator auskommt. Das stimmt vollkommen. Die Funktionspointer kann man direkt zuweisen, auslesen. Allerdings direkt vergleichen geht nicht, denn dann versucht er die Methode auszuführen. Man muss also Delphi irgendwie sagen, dass er den Funktionspointer benutzen soll. Also über Assigned, @ oder Addr. Assigned prüft obendrein selber noch auf nil oder nicht.

Folgender Code aus meinem Delphi 7.


Wenn man neben dem Notify auch noch einen Integer auf den Stack packt und sich die Hexwerte von @@Notify und @IntegerWert anschaut, dann ist der Wert nur ein paar Byte unterschiedlich. Bei @Notify hingeben ziemlich stark.

@@IntegerWert läuft hingegen auf einen Compilerfehler hinaus, da er gerne eine Variable haben möchte.

PS: Ich will nicht ausschließen, dass es irgendwo eine Option gibt oder, dass Delphi in der ein oder anderen Version dort etwas anderes macht.