Moin, Moin,
ich bezweifle, dass dieses Ratespiel für den Fragesteller noch einen praktischen Nährwert hat. Natürlich ist es (meist) nicht richtig, sofort eine passende Lösung zu liefern. Andererseits kann das auch, Lernbereitschaft vorausgesetzt, manchmal motivieren das Thema weiter zu ergründen - zumindest geht mir das oft so.
Dann stelle ich mal dieses Schema zur Diskussion (dass natürlich eine Instanz von TTest erzeugt werden muss, ist hier wohl nicht von Belang)...
Delphi-Quellcode:
unit Unit1;
interface { ----------------------------------------------------------------- }
type TTest =
class
function TestMe:Boolean;
// << METHODE der Klasse TTest
end;
function TestMe:Boolean;
// << freie FUNKTION
implementation { ------------------------------------------------------------ }
function TestMe:Boolean;
// Überall wo Unit1 eingebunden ist,
begin // kann diese Funktion mit ~~:=TestMe;
Result:=true
// aufgerufen werden!
end;
function TTest.TestMe:Boolean;
// diese Methode der Klasse TTest
begin // MUSS mit ~~:=~~Test.TestMe;
Result:=false
// aufgerufen werden!
end;
end.