Как получить от листера WM_EXITSIZEMOVE?

[Worros]

Или любой другой способ вытащить итоговые координаты, полученные по окончании ресайза окошка листера.

[Dec]

Или любой другой способ вытащить итоговые координаты, полученные по окончании ресайза окошка листера.

Попробуйте так:

Код: Выделить всё

...
FOldWndProc := SetWindowLong(ListerWindow, GWL_WNDPROC, integer(@NewWindowProc));
...
function NewWindowProc(AWindow: HWND; AMsg: UINT; AWParam: WPARAM; ALParam: LPARAM): LRESULT; stdcall;
var R: TRect;
begin
  FOldWndProc(AWindow, AMsg, AWParam, ALParam);
  if AMsg = WM_EXITSIZEMOVE then
    begin
      GetWindowRect(AWindow, R);
    end;
end;

[Worros]

Работает, спасибо!
Не знал, что сабклассинг можно так каскадировать.

[Worros]

Есть проблемы с несколькими экземплярами плагина.
Как выкручиваться?

[Dec]

Есть проблемы с несколькими экземплярами плагина.
Как выкручиваться?

Какие проблемы

[Worros]

У меня NewWindowProc глобальной получилась со всеми вытекающими последствиями: исключения так и сыплются, и визуальные артефакты при переключении между окнами листера с плагином.

[Dec]

Среда программирования?

[Worros]

VS2003

[Dec]

Если скину свой исходник на Delphi, то сможете разобраться?

[Worros]

Попробую
Спасибо заранее. Мыло сброшу в личку.

[Worros]

Получил, спасибо.

Насколько я понимаю, Delphi позволяет не поморщившись объявить одну оконную процедуру внутри другой. VC такого не допускает. После длительного гугления я нашёл максимум пример того, как после танцев с бубнами можно загнать WNDPROC внутрь класса. Но как этот пример следует привести к моему случаю (WNDPROC внутри WNDPROC) я не понял Мне такое не по зубам.

[VadiMGP]

объявить одну оконную процедуру внутри другой.

A зачем это нужно?

[Worros]

объявить одну оконную процедуру внутри другой.

A зачем это нужно?

Да, я поторопился с выводами. Не нужно это. Мне Dec уже объяснил мою ошибку.