Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Programm reagiert nicht - Windows-Test?
31. Mär 2012, 12:51
Vielleicht auch so was
Delphi-Quellcode:
procedure TForm2.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
if MyFlag4Ignore then
begin
if (Msg.message = WM_Char)
or (Msg.message = WM_LButtonDown)
or .....
or ...
then
Handled := true;
end;
end;
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|