Registriert seit: 27. Apr 2003
Ort: Bad Honnef
1.644 Beiträge
Delphi 2009 Professional
|
14. Jun 2003, 16:28
Hallo galaxy2k,
Deine Klasse TFigur wird implizit von TObject abgeleitet. Dadurch hat sie schon einen constructor und einen destructor geerbt. Dadurch, dass Du Deinen constructor Init nennst, erhält Deine Klasse TFigur einen zweiten constructor (Klassen können beliebig viele constructoren haben). Wenn Du innerhalb der des constructors Init nicht inherited Create aufrufst begehst Du einen schweren Fehler. Das geleiche gilt für Deinen destructor gibfrei. Damit hast Du dann die "VirtualChain" unterbrochen und Deine Objekte werden nicht richtig erstellt bzw. abgeräumt.
|