Einzelnen Beitrag anzeigen

Benutzerbild von TeTSuO
TeTSuO

Registriert seit: 26. Feb 2005
Ort: Ludwigshafen am Rhein
60 Beiträge
 
Delphi 7 Enterprise
 
#6

Re: DiaSchau Editor das DiaShow Program

  Alt 26. Apr 2005, 20:36
Hilfe!

Ich habe ein Problem festgestellt das ich nicht lösen kann
Ich will OnMouseDown für die ganze Form abfangen aber es klappt nicht.

Wenn ich während des Abspielens auf eine Bild-Box (TPanel mit TImage) klicke kommt die Meldung nicht an.

Wie kann ich die Maus-Events für die ganze Form abfangen egal worauf ich klicke

Ich mache das zurzeit so

Delphi-Quellcode:

Procedure TForm1.WndProc(var Msg: TMessage);
Begin
 // wenn Message = Linke Maustate gedrückt
 if Msg.Msg = WM_LBUTTONDOWN Then
    // Timer Event auslösen um nächsten Bild zu laden
    tmrDelay.OnTimer(fPlay);
 // Messages weiter verabeiten
 inherited;
End;
”Wer immer nur das tut was er schon kann, wird immer das bleiden was er schon ist”

DiaSchau
  Mit Zitat antworten Zitat