Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi CreateMessageDialog mit eigener Fensterklasse (https://www.delphipraxis.net/171286-createmessagedialog-mit-eigener-fensterklasse.html)

ConnorMcLeod 30. Okt 2012 07:33

CreateMessageDialog mit eigener Fensterklasse
 
Hallo Kollegen,
CreateMessageDialog liefert ein TForm zurück. Von diesem TForm möchte ich die WndProc überschreiben. Daher die Idee, eine eigene FensterKlasse TMyMessageForm abzuleiten mit einer überschriebenen WndProc. Aber wie bringe ich CreateMessageDialog jetzt dazu, mir ein TMyMessageForm zu liefern? Das Ergebnis zu casten hilft nicht.

Sir Rufo 30. Okt 2012 07:41

AW: CreateMessageDialog mit eigener Fensterklasse
 
Geht IMHO nicht, denn die FormInstanz wird in der function direkt erzeugt, da wird nichts delegiert, sondern ist fest verdrahtet.

Zum Casten: Logisch, eine TEdit-Instanz wird durch Casten auch nicht zur ListView

EDIT: Aber wer sollte dich daran hindern, den ganzen Code aus Dialogs zu kopieren und den Aufruf um einen Parameter TMessageFormClass zu erweitern und entsprechend darauf zu reagieren. Dann ist es so wie du das willst.

ConnorMcLeod 30. Okt 2012 08:00

AW: CreateMessageDialog mit eigener Fensterklasse
 
Danke, habe ich befürchtet :-/
Zum Casten: ja nee is klaar, wollte ich ich nur erwähnt haben.
Den Code zu kopieren wollte ich vermeiden - finde ich unelegant - aber das wird's wohl sein.


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:05 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz