Плавно перемещать пользовательские объекты в окне Powerbuilder

Question

Я использую Powerbuilder 10.5 и создал окно, которое использует openuserobject для отображения некоторых пользовательских визуальных пользовательских объектов.

Мне удалось использовать события перетаскивания для перемещения моих пользовательских объектов вокруг области окна, но я предпочел бы более плавный путь, который также отобразил бы перетаскиваемый объект, пока он перемещается в новое положение. По умолчанию режим перетаскивания отображает значок во время перетаскивания.

Есть ли способ разрешить это?

Благодаря

Answer 1

Вы могли бы попробовать этот старый трюк, используемого для перемещения окна без заголовков.

[Instance declaration] 
CONSTANT uint WM_NCLBUTTONDOWN = 161 
CONSTANT uint HTCAPTION = 2 

[mousedown event on the userobject] 
Post(Handle(this), WM_NCLBUTTONDOWN, HTCAPTION, Long(xpos, ypos)) 

Answer 2

Спасибо, похоже, что мероприятие «DragWithin» сделало трюк, хотя оно не супер гладкое.

Я использовал obj.move (x, y) в моем событии dragwithin и проблема решена!