In a Delphi 10.4 VCL Application, I need to detect when the FORM RESIZING ENDS. (E.g. after the user resized the Form by dragging its size-grip).
So I have placed a TApplicationEvents
component on the form and created its OnMessage
event-handler, trying to catch the WM_EXITSIZEMOVE
message:
procedure TformMain.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean);
begin
if (Msg.Message = WM_EXITSIZEMOVE) then
begin
CodeSite.Send('TformMain.ApplicationEvents1Message: WM_EXITSIZEMOVE');
end;
end;
But the event-handler with WM_EXITSIZEMOVE
is not executed after resizing the Form.
So how can I detect the Form Resize END, maybe by using the TApplicationEvents component?