OBS/Adminhilfe/Vererbung Objectpascal: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
Für diese Seite wurde eine Zugriffsbeschränkung eingerichtet. Falls du diese Nachricht siehst, bist du nicht berechtigt, diese Seite einzusehen.
(Importing text file)
(Importing text file)
Zeile 1: Zeile 1:
<font face="Times New Roman">'''<font size="5"></font>'''</font>
<font size="2" color="#000000" face="Arial"> </font>


<center>override - overload - reintroduce - virtual<br /></center>
<div><center><font size="5" face="times new roman">'''override - overload - reintroduce - virtual'''</font></center></div><div><font size="3" face="times new roman">'''<br />'''<div><font size="3" face="times new roman">'''virtual'''</font><font size="3" face="times new roman"> und </font><font size="3" face="times new roman">'''dynamic'''</font><font size="3" face="times new roman"> besagen, daß diese Methode in Nachfahren </font><font size="3" face="times new roman">'''überschreibbar'''</font><font size="3" face="times new roman"> ist</font><br /><font size="3" face="times new roman"></font><br /><font size="3" face="times new roman">'''override'''</font><font size="3" face="times new roman"> sagt, daß diese Methode eine virtuelle/dynamische Methode eines Vorfahren </font><font size="3" face="times new roman">'''überschreiben'''</font><font size="3" face="times new roman"> soll</font><br /><font size="3" face="times new roman"></font><br /><font size="3" face="times new roman">'''abstract'''</font><font size="3" face="times new roman"> besagt, daß diese virtuelle/dynamische Mathode in der "ausgangsklasse" zwar </font><font size="3" face="times new roman">'''deklariert, aber nicht implementiert'''</font><font size="3" face="times new roman"> ist.</font><br /><font size="3" face="times new roman"></font><br /><font size="3" face="times new roman">'''overload'''</font><font size="3" face="times new roman"> besagt, daß es eine gleichnamige Methode gibt (natürlich mit anderen Parametern)</font><br /><font size="3" face="times new roman">und diese paralell/alternativ aufrufbar sind</font><br /><font size="3" face="times new roman"></font><br /><font size="3" face="times new roman">mit </font><font size="3" face="times new roman">'''reintroduce'''</font><font size="3" face="times new roman"> sagt man, daß es in den Vorfahren eine gleichnamige Methode gibt,</font><br /><font size="3" face="times new roman">man diese aber "absichtlich" </font><font size="3" face="times new roman">'''verdecken'''</font><font size="3" face="times new roman"> will. (ohne reintroduce würde der Compiler eine entsprechende Warnung anzeigen<div><font size="3" face="times new roman"><br /><div><font size="4" face="times new roman">'''Achtung Beispiel reintroduce zu vermeiden:'''<div><font size="4" face="times new roman">'''<br />'''<div><font size="3" face="times new roman">TKlasseA = class(TObject)</font><br /><font size="3" face="times new roman">function GetMD: TModelKlasseA; virtual; // überschreibbar machen</font><br /><font size="3" face="times new roman">end;</font><br /><font size="3" face="times new roman"></font><br /><font size="3" face="times new roman">TKlasseB = class(TKlasseA)</font><br /><font size="3" face="times new roman">function GetMD: TModelKlasseB;</font><font size="3" face="times new roman">''' override'''</font><font size="3" face="times new roman">; // Vorgänger wird überschrieben</font><br /><font size="3" face="times new roman">end;</font><br /><font size="3" face="times new roman">..</font><br /><font size="3" face="times new roman">function TKlasseA.GetMD: TModelKlasseA;</font><br /><font size="3" face="times new roman">begin</font><br /><font size="3" face="times new roman">// vorerst mal leer, kann/wird sich aber ändern. Nötig, weil abstract fehlt. </font><br /><font size="3" face="times new roman">// wird abstract gewünscht, dann besser die function für TKlasseA wegen Überflüssigkeit</font><br /><font size="3" face="times new roman">// gleich weglassen und erst in TKlasseB einführen. Ausnahme : es handelt sich um eine Komponentenklasse,</font><br /><font size="3" face="times new roman">// die verkauft werden soll etc.</font><br /><font size="3" face="times new roman">end;</font><br /><font size="3" face="times new roman"></font><br /><font size="3" face="times new roman">function TKlasseB.GetMD: TModelKlasseB;</font><br /><font size="3" face="times new roman">begin</font><br /><font size="3" face="times new roman">'''inherited;'''</font><font size="3" face="times new roman"> // zuerst GetMD von TKlasseA ausführen. Wird das weggelassen, dann wird TKlasseA.GetMD NICHT ausgeführt</font><br /><font size="3" face="times new roman">// der Krempel, den TKlasseB zusätzlich zu TKlasseA noch braucht</font><br /><font size="3" face="times new roman">end;</font><br /><font size="3" face="times new roman"></font><br /><font size="3" face="times new roman"></font><br /><font size="3" face="times new roman"><br />[[Category:html]]
 
<font face="Times New Roman">'''<font size="3"><br /> virtual</font>'''</font><font face="Times New Roman"><font size="3"> und </font></font><font face="Times New Roman">'''<font size="3">dynamic</font>'''</font><font face="Times New Roman"><font size="3"> besagen, daß diese Methode in Nachfahren </font></font><font face="Times New Roman">'''<font size="3">überschreibbar</font>'''</font><font face="Times New Roman"><font size="3"> ist<br /><br /></font></font><font face="Times New Roman">'''<font size="3">override</font>'''</font><font face="Times New Roman"><font size="3"> sagt, daß diese Methode eine virtuelle/dynamische Methode eines Vorfahren </font></font><font face="Times New Roman">'''<font size="3">überschreiben</font>'''</font><font face="Times New Roman"><font size="3"> soll<br /><br /></font></font><font face="Times New Roman">'''<font size="3">abstract</font>'''</font><font face="Times New Roman"><font size="3"> besagt, daß diese virtuelle/dynamische Mathode in der "ausgangsklasse" zwar </font></font><font face="Times New Roman">'''<font size="3">deklariert, aber nicht implementiert</font>'''</font><font face="Times New Roman"><font size="3"> ist.<br /><br /></font></font><font face="Times New Roman">'''<font size="3">overload</font>'''</font><font face="Times New Roman"><font size="3"> besagt, daß es eine gleichnamige Methode gibt (natürlich mit anderen Parametern)<br /> und diese paralell/alternativ aufrufbar sind<br /><br /> mit </font></font><font face="Times New Roman">'''<font size="3">reintroduce</font>'''</font><font face="Times New Roman"><font size="3"> sagt man, daß es in den Vorfahren eine gleichnamige Methode gibt,<br /> man diese aber "absichtlich" </font></font><font face="Times New Roman">'''<font size="3">verdecken</font>'''</font><font face="Times New Roman"><font size="3"> will. (ohne reintroduce würde der Compiler eine entsprechende Warnung anzeigen<br /><br /></font></font><font face="Times New Roman">'''<font size="4">Achtung Beispiel reintroduce zu vermeiden:<br /><br /></font>'''</font><font face="Times New Roman"><font size="3">TKlasseA = class(TObject)<br /> function GetMD: TModelKlasseA; virtual; // überschreibbar machen<br /> end;<br /><br /> TKlasseB = class(TKlasseA)<br /> function GetMD: TModelKlasseB;</font></font><font face="Times New Roman">'''<font size="3"> override</font>'''</font><font face="Times New Roman"><font size="3">; // Vorgänger wird überschrieben<br /> end;<br /> ..<br /> function TKlasseA.GetMD: TModelKlasseA;<br /> begin<br /> // vorerst mal leer, kann/wird sich aber ändern. Nötig, weil abstract fehlt. <br /> // wird abstract gewünscht, dann besser die function für TKlasseA wegen Überflüssigkeit<br /> // gleich weglassen und erst in TKlasseB einführen. Ausnahme : es handelt sich um eine Komponentenklasse,<br /> // die verkauft werden soll etc.<br /> end;<br /><br /> function TKlasseB.GetMD: TModelKlasseB;<br /> begin<br /></font></font><font face="Times New Roman">'''<font size="3">inherited;</font>'''</font><font face="Times New Roman"><font size="3"> // zuerst GetMD von TKlasseA ausführen. Wird das weggelassen, dann wird TKlasseA.GetMD NICHT ausgeführt<br /> // der Krempel, den TKlasseB zusätzlich zu TKlasseA noch braucht<br /> end;<br /><br /><br /><br /></font></font>[[Category:hilfe]]
----
----
[[Spezial:Beiträge/Auto import|Auto import]] 17:09, 5. Jul. 2011 (CEST)
[[Benutzer:Auto import|Auto import]] 15:18, 25. Aug. 2011 (CEST)

Version vom 25. August 2011, 14:18 Uhr

override - overload - reintroduce - virtual

virtual und dynamic besagen, daß diese Methode in Nachfahren überschreibbar ist

override sagt, daß diese Methode eine virtuelle/dynamische Methode eines Vorfahren überschreiben soll

abstract besagt, daß diese virtuelle/dynamische Mathode in der "ausgangsklasse" zwar deklariert, aber nicht implementiert ist.

overload besagt, daß es eine gleichnamige Methode gibt (natürlich mit anderen Parametern)
und diese paralell/alternativ aufrufbar sind

mit reintroduce sagt man, daß es in den Vorfahren eine gleichnamige Methode gibt,
man diese aber "absichtlich" verdecken will. (ohne reintroduce würde der Compiler eine entsprechende Warnung anzeigen

Achtung Beispiel reintroduce zu vermeiden:

TKlasseA = class(TObject)
function GetMD: TModelKlasseA; virtual; // überschreibbar machen
end;

TKlasseB = class(TKlasseA)
function GetMD: TModelKlasseB; override; // Vorgänger wird überschrieben
end;
..
function TKlasseA.GetMD: TModelKlasseA;
begin
// vorerst mal leer, kann/wird sich aber ändern. Nötig, weil abstract fehlt.
// wird abstract gewünscht, dann besser die function für TKlasseA wegen Überflüssigkeit
// gleich weglassen und erst in TKlasseB einführen. Ausnahme : es handelt sich um eine Komponentenklasse,
// die verkauft werden soll etc.
end;

function TKlasseB.GetMD: TModelKlasseB;
begin
inherited; // zuerst GetMD von TKlasseA ausführen. Wird das weggelassen, dann wird TKlasseA.GetMD NICHT ausgeführt
// der Krempel, den TKlasseB zusätzlich zu TKlasseA noch braucht
end;




Auto import 15:18, 25. Aug. 2011 (CEST)