Entschuldigung dass ich so spät antworte.
Also ein bisschen erweiterte Situation:
Ich habe die Klassen
Delphi-Quellcode:
TSonnenstandsFunktion=function(BG,LG:real; time:real; day,month:byte; year:integer):real;
TSonne = class
public
function getalpha(BG,LG:real; time:real; day,month:byte; year:integer):real;
function getbeta(BG,LG:real; time:real; day,month:byte; year:integer):real;
und die Funktion
Delphi-Quellcode:
function NullStelle(Funktion:TSonnenstandsFunktion):real;
begin
result:=Funktion(ds.BG,ds.LG,ds.hour,ds.day,ds.month,ds.year);
end;
die ich zu Testzwecken nur mit beispielwerten füttere anstadt die Nullstelle auszurechnen.
Die Variable:
Sonne:TSonne;
Wie übergebe ich die
Methode getalpha oder getbeta der Variable Sonne an die Funktion Nullstelle?
So klappt es natürlich nicht:
showmessage(floattostr(NullStelle(@Tsonne.getbeta)));
und so compiliert er es leider nicht:
showmessage(floattostr(NullStelle(@sonne.getbeta)));