Движение зажатой мыши по экрану

[NEoMASTERR]

Здравствуйте, сделал ползунок как в винампе и подобных программах, но при зажатии мыши на ползунке винампа мышку можно увести вверх/вниз и ползунок все равно будет двигаться, на моем компоненте так не происходит ибо wmmousemove не приходит. Как решить проблему? Заранее спасибо

[lomastr_]

все руками делать, как при драгонье

а вообще как вы сделали?
стандартный ведет себя правильно

[NEoMASTERR]

Сообщение от lomastr_

а вообще как вы сделали?
стандартный ведет себя правильно

Я сделал от TGraphicControl а в исходнике стокового тракбара что то не разберусь)

[lomastr_]

TGraphicControl

а чем стандартный не угодил? перерисовку перекрыли, может еще чего да и все

[Sibedir]

Могу ошибаться, мэтры поправят, но возможно поможет SendCancelMode.
Я так понял, это из-за него, если нажать левой кнопкой мыши на окне, а потом увести мышь с окна не отпуская кнопки, окно продолжет получать WM_MOUSEMOVE.


Добавлено ------------------------------------------------------------------------------------------------------
Хотя странно. Если ваш компонент - потомок TGraphicControl, то должно работать само по себе, без допкода.

[NEoMASTERR]

Сообщение от Sibedir

Хотя странно. Если ваш компонент - потомок TGraphicControl, то должно работать само по себе, без допкода.

Возможно просто есть еще какие то манипуляции с контролом которые необходимы.

Решение найдено в моей невнимательности) Куча вкладок в делфи - очень плохо. Редактировал один компонент, а проверял другой))

procedure ......wmlbuttondown(var message: twmmouse);
begin
  SetCaptureControl(Self);
////
end;

procedure .......wmlbuttonup(var message: twmmouse);
begin
  SetCaptureControl(nil);
end;