TFontDialog - Bug - Events werden nicht ausgelöst

[TBug]

Schön wie man die Zeit vertrödeln kann, wenn Komponenten nicht das tun, was sie sollen.

Die Events "OnClose" und "OnApplyClick" werden gar nicht ausgelöst und das "OnShow"-Event wird nicht beim Anzeigen des Dialogs, sondern beim Schliessen aufgerufen.

Weiß jemand, ob dieser Bug bereits bekannt ist, denn ich habe keinen Eintrag gefunden?

[theo]

Auf Windows ist das offenbar so. Auf GTK2 funktioniert's (ausser apply, das gibt es nicht)
Die meisten Leuten benötigen diese Events wohl gar nicht, darum ist das Problem vllt.nicht im Bugtracker eingetragen.
Was willst du denn machen, bzw. wie kommst du auf dieses Problem?

[TBug]

Was willst du denn machen, bzw. wie kommst du auf dieses Problem?

Im OnShow Ereignis sollte der Property Font des Dialogs die Property Font der zu bearbeiteten Komponente zugewiesen werden.

Entsprechend natürlich beim Betätigen der Übernehmen-Schaltfläche (welche man in den Optionen einschalten kann) des Dialogs, den entspechend ausgewählten Font der Komponente zuweisen.

Das Übernehmen ist/wäre eine praktische Sache, denn man sieht sofort den Text der Komponente in der geänderten Schriftart, ohne dass der Dialog geschlossen werden müßte, um die Einstellungen zu übernehmen.

[theo]

Was willst du denn machen, bzw. wie kommst du auf dieses Problem?

Im OnShow Ereignis sollte der Property Font des Dialogs die Property Font der zu bearbeiteten Komponente zugewiesen werden.

Entsprechend natürlich beim Betätigen der Übernehmen-Schaltfläche (welche man in den Optionen einschalten kann) des Dialogs, den entspechend ausgewählten Font der Komponente zuweisen.

Das geht auch so, ohne Events. Deshalb interessiert sich niemand für den Bug.

Code: Alles auswählen

 
  FontDialog1.Font.Assign(Memo1.Font);
  If FontDialog1.Execute then Memo1.Font.Assign(FontDialog1.Font);   

Das mit dem Apply geht auf GTK2 auch, hatte vorhin die Option gar nicht gesehen.
Das wäre auf Win ein Bug.