События мыши

← →
Галинка © (2006-12-05 19:16) [0]

Испоьзую события мыши MouseDown, MouseUp, MouseClick

медленно начинаю понимать, что при маусклик происходит оба первых события. На MouseUp мне надо обновить хмл и тривью, которое его показывает. Но это надо делать только если были изменения, например объект передвинули. Как отслеживать в событиях мыши (?) были ли произведены изменения?

← →
Algol (2006-12-05 21:41) [1]

Были ли произведены изменения, должен отслеживать сам документ. К мыши никакого отношения это не имеет.

← →
clickmaker © (2006-12-06 10:04) [2]

> объект передвинули. Как отслеживать в событиях мыши (?)
> были ли произведены изменения?

если речь об изменении координат объекта, то запомнить в начале движения, потом сравнивать с e.X, e.Y

← →
Клара (2006-12-06 10:54) [3]

Мы делаем так:
procedure TMyForm.FormMouseUp(Sender: TObject;
Button: TMouseButton;
Shift: TSiftState; X, Y: Integer);
var P: TPoint;
begin
P:=GetClientOrigin;
if Button=mbRight then PopupMenu1.Popup(P.X+X,P.Y+Y);
end;

← →
Barloggg (2006-12-06 11:29) [4]

а я для перетаскивания довольствуюсь одним лишь MouseMove если при этом никакая конпка не нажата то идет запоминание текущих координат, если нажата, то сдвигание на разницу относительно ранее запомненных против текущих.

а для отслеживания изменения это только флажком при совершении собственно изменения. и при ближайшем чего_у_тебя_там этот флажок проверять.

вообще нажатие и отпускание кнопки мыши не всегда порождают OnClick, но это частности.

Короче. Вставила кнопку все равно.

Хотела сделать так, что на MouseMove перемещаем, и когда отпускаем мышку MouseUp тогда и меняем. Но он начал менять на все клики. А т.к. на двойной щелчок происходит выхов диалога для изменения свойст, то во время двойного щелчка он два раза обновлял мне тривью. Что само пго себе очень долго. Потому что хмл большой ((

События мыши Найти похожие ветки