The following example demonstrates trapping the WM_EXITSIZEMOVE message to determine when the user has exited a Window sizing or moving event. Although the message is documented as available only under Windows NT, it does work equally as well under Windows 95. Note that you can also trap the WM_ENTERSIZEMOVE to determine when the user is initiating a window move or size operation.

Example:
type
  TForm  = class(TForm)
  private
    { Private declarations }
  public
    procedure WMEXITSIZEMOVE(var Message: TMessage);
       message WM_EXITSIZEMOVE;
    { Public declarations }
  end;
var
  Form : TForm ;
implementation
{$R *.DFM}
procedure TForm .WMEXITSIZEMOVE(var Message: TMessage);
begin
  Form .Caption := 'Finished Moving and sizing';
end;