![]() |
Re: Tastaureingabe bei dyn. erstellter Form überwachen
Zitat:
Ich hab aber gedacht ob es vielleicht so geht damit ich nicht so viel proggen muss
Delphi-Quellcode:
Dann klappt das aber nicht mehr mit Type TMsgForm = class(TForm) published property OnKeyPress: TKeyPressEvent; End; Var AMsgDialog : TMsgForm;
Delphi-Quellcode:
Das wäre das einfachste wenn einer ne idee hätte wie das funzt
AMsgDialog := CreateMessageDialog(Cap, GetmtType(uType), Getbtns(uType));
|
Re: Tastaureingabe bei dyn. erstellter Form überwachen
Darf ich fragen, WAS nicht klappt?
|
Re: Tastaureingabe bei dyn. erstellter Form überwachen
Zitat:
Delphi-Quellcode:
Steht im Meldungsfenster
AMsgDialog := CreateMessageDialog(Cap, GetmtType(uType), Getbtns(uType));
[Fehler] MsgBox.pas(47): Inkompatible Typen: 'TMsgForm' und 'TForm' |
Re: Tastaureingabe bei dyn. erstellter Form überwachen
Zeig uns doch mal die Funktion CreateMessageDialog ;)
Ich hab dieses seltsame Gefühl, dass sie als Rückgabewert "TForm" hat ;) |
Re: Tastaureingabe bei dyn. erstellter Form überwachen
Die Function ist in Delphi integriert in der Unit Dialogs und mit dem Hint hab ich gesehen das Sie TForm zurückgibt. :pale:
Was Jetzt |
Re: Tastaureingabe bei dyn. erstellter Form überwachen
du musst die methode auch nicht unbedingt in diese Klasse packen. Du kannst die Methode auch in dein MainForm packen.
|
Re: Tastaureingabe bei dyn. erstellter Form überwachen
In diesem Fenster wird aber auch der Esc Button schon abgefragt ich muss es also über das Fenster der MessageBox machen und dem kann ich die Prozedur nicht zuweisen bzw. auslesen
|
Re: Tastaureingabe bei dyn. erstellter Form überwachen
musst du nicht
Delphi-Quellcode:
type
TYourMainForm = class(TFrom) [...] private procedure FOnKeyPressFuerMsgDlg(Sender: TObject; var Key: Char); [...] end; [...] procedure TYourMainForm.FOnKeyPressFuerMsgDlg(Sender: TObject; var Key: Char); begin //das ist nun die OnKeyPress für dein Dialog end; [...] var AMsgDialog: TForm; begin AMsgDialog := CreateMessageDialog(Cap, GetmtType(uType), Getbtns(uType)); AMsgDialog.OnKeyPress := FOnKeyPressFuerMsgDlg; [...] |
Re: Tastaureingabe bei dyn. erstellter Form überwachen
Zitat:
Dann muus ich aber wenn ich die Unit in ner anderen App benutze das OnKeyPressEvent anpassen und auch die zuweisung zum Event ändern. |
Re: Tastaureingabe bei dyn. erstellter Form überwachen
hättest du bei deinem ausgangsposting auch gemusst, ansonsten würde nur CreateMessageDialog neu zu schreiben übrig bleiben.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:42 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz