Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.616 Beiträge
Delphi 12 Athens
|
AW: Klassen aus Vaterklassen erben lassen
1. Mär 2011, 16:33
Delphi-Quellcode:
type
TPunkt = class
private
//private Felder und Methoden
protected
//protected Felder und Methoden
public
//öffentliche Properties und Methoden
end;
TStrich = class(TPunkt)
//hier nun wie oben die zusätzlichen Felder/Methoden/Properties deklarieren
end;
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|