Delphi-Quellcode:
CONSTRUCTOR TGraphPaper.Create(MyParent: TWinControl; Title: STRING);
BEGIN
INHERITED CREATE(MyParent);
Parent := MyParent; // <-- ist das nicht überflüssig? Wird mit inherited Create(MyParent) doch schon gesetzt
...
Ja, in der Tat -- aber es ändert nichts an der Sache wenn ich es wegnehme!
Beim ersten Aufruf von
Zeichnen ist WIDTH = 0 und HEIGHT = 105: Weder 0 noch 105 machen irgendwie einen Sinn (scheint sich in diesem Stadium noch um Zufallswerte zu handeln). Bekommt mein Objekt nach
INHERITED CREATE(MyParent) nun die Größe seines Parents oder nicht? Und wenn nicht: Ich kann ja nicht einfach Width = 50 un Height = 50 schreiben (nur damit mal ein beliebiger aber von Null verschiedener Wert dort steht, weil ja damit dirket wieder SetBounds gerufen wird ==> Endlos-Loop).
Sehr verwirrend das.
Gruß
Jazzman