Thema: Delphi [OOP] inherited Problem

Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#6

Re: [OOP] inherited Problem

  Alt 16. Jan 2005, 02:05
Zitat von Muetze1:
- was ist daran unverständlich?
Nur keine Aufregung. Ich habe das inherited jetzt später aufgerufen und es geht. Aber es ist nicht so ganz nachzuvollziehen, warum ich die Farbe setzten kann, dann das inherited aufrufe wegen rechtsbündig usw. und es geht. Umgekehrt aber nicht. Konnte eben noch nie gut malen. 8) Also hat irgendwas mehr Priorität. Wäre nett, wenn du mir sagen würdest was das ist und weshalb. Es geht also nur hier drum (Objects sind im Zusammenhang uninteressant) :

geht :

Delphi-Quellcode:
sgNr.Canvas.brush.Color := clGray;
sgNr.Canvas.FillRect (Rect);
sgNr.Canvas.TextOut(rect.Left,rect.Top,sgNr.Cells [ACol,ARow]);
inherited; // erst jetzt aufrufen, da Farben jetzt neu gesetzt !
             // rechtsbündig ist aus Vorgänger
geht nicht :

Delphi-Quellcode:
inherited; // rechtsbündig ist aus Vorgänger
sgNr.Canvas.brush.Color := clGray;
sgNr.Canvas.FillRect (Rect);
sgNr.Canvas.TextOut(rect.Left,rect.Top,sgNr.Cells [ACol,ARow]);
Gruß
Hansa
  Mit Zitat antworten Zitat