Лидеры

TFormAdd.Create

На уровне формы есть методы для работы с мышью: procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Single); virtual; procedure MouseMove(Shift: TShiftState; X, Y: Single); virtual; procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Single; DoClick: Boolean = True); virtual; procedure MouseWheel(Shift: TShiftState; WheelDelta: Integer; var Handled: Boolean); virtual; procedure MouseLeave; virtual; Используйте их, для эмуляции нажатия мышкой или пальцем. В качестве координат нужно передавать абсолютные координаты компонента

Я уже завел этот баг во внутреннем треккере.

Решил при помощи координат. На OnMouseDown сохраняем координату Y. А в обработке igiLongTap проверку или теперешняя координата равна Y.

не верно! как нарисуешь в OnUpdateObjects, так и будет

Обновился до зефирки приложения написанные на RX10 запускаются режим мульти окон работает с нашими приложениями (я был удивлен)

Тоесть сравнивать значения Old[New]ViewportPosition, и если они не равны, то меняем флаг, а в обработке лонгтапа сделать проверку на флаг? Значения Old[New]ViewportPosition в конце скролла будут одинаковы, или как-то надо будет определить конец скроллинга? достаточно один раз сравнить, был ли скрол if not myFlag then myFlag := newViewportPosition <> OldViewportPosition; // типа того, нет времени проверять onMouseUp myFlag := false;

Или ListView1.Selected.Text

как вариант, Item то уже выбран s := Listview1.Items[listview1.itemindex].text;

uses System.UITypes if (EventInfo.GestureID = igiLongTap) then begin

жесты использовать, LongTap есть такое

Aptem, а не проще было бы сделать сервак(web например) и тогда ваши провайдеры просто не нужны. разработать протокол обмена данными по средствам json\xml и тогда не нужно было бы заботить о клиентских приложениях и какая бд используется вся работа перекладывается на сервак, хоть каждый месяц меняйте БД, просто переписать сервак и все клиенты снова получают и отправляют актуальную информацию

Типы координат В FIreMonkey различают три вида координат: Локальные - это координаты в системе координат контрола. Абсолютные - это координаты в системе координат клиентской части формы. Экранные - это координаты в системе координат экрана. Соответственно, если речь идет о форме, то позиция формы задается в экранных координатах. Если речь идет о контролах, то в локальных координатах своего родительского контрола. Конвертация Локальные -> Абсолютные TControl.LocalToAbsolute(TPointF): TPointF Абсолютные -> Локальные TControl.AbsoluteToLocal(TPointF): TPointF Абсолютные -> Экранные TControl.Scene.LocalToScreen(TPointF): TPointF; Экранные -> Локальные TControl.Scene.ScreenToLocal(TPointF): TPointF;