Einzelnen Beitrag anzeigen

Schucki

Registriert seit: 17. Jul 2004
158 Beiträge
 
Delphi 2010 Architect
 
#8

Re: "Application.OnMessage" wird 30x hintereinande

  Alt 17. Jul 2004, 16:58
Zitat von p0w3r5tr34m3r:
hi,
wie wärs wenn du ne globale var machst die du dann auf true setzt wenn das einmal durchgelaufen ist ?

Delphi-Quellcode:
procedure TForm1.MyMessage(var Msg:TMsg; var Handled:Boolean);
begin
  if ( not handled ) and ( Msg.message=HCWM_SET ) then begin
    ShowMessage('SET-OK');
    Handled:=True;
  end
  else
    exit;
end;
(nicht getestet, müsste aber klappen)

Powerstreamer
Denke das es so nicht gedacht ist...
Also wann will man die Variable auf false setzten?
Wieviel von dennen soll man denn verbauen wenn man mehr als eine Message verarbeiten will.

Es muss doch eine Lösung geben wie man die Behandlung der Nachricht richtig abschließt.
Wofür steht den die (...; var Handled:Boolean) ???

so langsam tut es weh...

@Bernhard

Ja ich bin am verzweifeln... nutze hier im Übrigen WinXP...


MfG Schucki...
Frank
  Mit Zitat antworten Zitat