Wenn ein Programm minimiert ist, wird beim Klicken in die minimierte Caption in der Taskleiste
1) Bei Linksklick das Programmfenster "geöffnet"
2) Bei Rechtsklick ein Menu geöffnet, in dem verschiedene Optionen angeboten werden.
Ich möchte, dass mein Programm einen Rechtsklick in die minimierte Caption abfängt und darauf reagiert.
Hintergrund:
Das Programm spielt den ganzen Tag Musikstücke ab.
Wenn ich einen Anruf erhalte will ich die Wiedergabe anhalten und wieder starten können, OHNE dafür das Programmfenster "offnen" zu müssen.
Ich habe bei den Schweizern folgendes gefunden, was aber nur funktioniert, wenn das Programmfenster geöffnet es.
Wenn es minimiert in der Tastleiste liegt, funktioniert das nicht.
" funktioniert das nicht" heißt, die Prozedur "TForm1.WMNCRBUTTONDOWN" wird nicht aufgerufen.
Weiß jemand eine Lösung für das Problem?
In der Deklaration der Form
Delphi-Quellcode:
private
procedure WMNCRBUTTONDOWN(var msg: TMessage); message WM_NCRBUTTONDOWN;
end;
Im Implementation Abschnitt
Delphi-Quellcode:
Procedure TForm1.WMNCRBUTTONDOWN(var msg: TMessage);
begin
if msg.wParam = HTCAPTION then Caption := 'Right Click!';
// Message.Result := 0; {to ignore the message}
inherited;
end;