Hi Martin, Another issue which I think worked long time ago. In my app I have volume form which inherit from hint window. Main behavior of this form is that it should be freed when click on ANY other widget or just hidden when click on window from another app (and bring back when click on my app). So basically similar behavior of popup menu. Everything is working fine except that volume window is not released when click on window decorator (top bar outside the X window which have _ and X buttons). In this topic I mentioned about this but you wrote that it is hard to implement: https://www.mail-archive.com/mseide-msegui-talk@lists.sourceforge.net/msg09969.html Although, I remember that I reported same issue for popup menu and you finally managed to fix it (which you also see on attached video). So my question is, what trick did you use in popup menu? OnDeactivate and OnExit events are not triggered. Thought that this proc has to be extended:
procedure TfrmVolume.applicationev(const sender: tactcomponent;
var aevent: tmseevent; var handled: Boolean);
begin
writeln('Event ', aevent.kind);
if (aevent.kind = ek_buttonpress) then begin
with tmouseevent(aevent) do begin
if (fwinid <> window.winid) or //click in other window
not pointinrect(fpos,widgetsizerect) then begin
//click out of window in case of modal
writeln('Release volume');
release();
end;
end;
end;
end;
... but none events are triggered when click on decorator :/
Regards and happy new year by the way :)
https://drive.google.com/open?id=1D-i8pN0Pq4mBYz7798u3QkewKHNT8X9g
volumeissue.7z
Description: application/7z-compressed
------------------------------------------------------------------------------ Check out the vibrant tech community on one of the world's most engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________ mseide-msegui-talk mailing list mseide-msegui-talk@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
