Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.166 Beiträge
 
Delphi 12 Athens
 
#3

Re: in TFont.OnChange auf Owner zugreifen

  Alt 19. Jan 2009, 10:28
Soein OnChange-Ereignis hab ich ja im Owner ... und es ibt auch nur einen Owner, aber dafür mehrere Fonts, welche auf den Owner, über die selbe Routine zugreifen ... was allerdings kein Problem darstellt, da ich ja an den Font rankomm (siehe Sender).

*schuppen von augen fällt*
bin ich blöd ... ganz vergessen, daß die Objectrefferenz ja mit in der Ereignisprozedur (bzw. sozusagen im Zeiger darauf) gespeichert wird

Delphi-Quellcode:
// vorher

Procedure TCircuitDesigner.OnFontChange(Sender: TObject);
  Begin
    With TCircuitDesigner(TFontEx(Sender).Owner) do Begin
      DoLibraryChange;
      DoCircuitChange;
    End;
  End;

// jetzt

Procedure TCircuitDesigner.OnFontChange(Sender: TObject);
  Begin
    DoLibraryChange;
    DoCircuitChange;
  End;
manchma macht man sich echt mehr Arbeit, als nötig


gelöst ... gab nur selbstgemachte Probleme
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat