Вниз
Скачать: CL | DM;

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

← →
Галинка ©   (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, но это частности.


← →
Галинка ©   (2006-12-06 15:43) [5]

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

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.053 c
15-1165203590
Slider007
2006-12-04 06:39
2006.12.24
С днем рождения ! 4 декабря


2-1165230352
IGo
2006-12-04 14:05
2006.12.24
Не отображается Label, пока не загрузится OLE объект


15-1165181106
Loginov Dmitry
2006-12-04 00:25
2006.12.24
Win XP SP2 ограничивает размер отправляемых сообщений :(


2-1165251762
И. Павел
2006-12-04 20:02
2006.12.24
поле TDateTime


2-1165145365
Riply
2006-12-03 14:29
2006.12.24
ExpandEnvironmentStrings для строк, которые не экспандяться :)




   Наверх