Drag and Drop TListBoxItem in Android.

[Astghik]

скажите пожалуйста , как реализовать Drag and Drop  TListBoxItem на Андроид (Rad Studio 10)

Изменено 23 января, 2017 пользователем Astghik

[krapotkin]

скорее всего, создать TBitmap по мотивам item и двигать уже его

[Astghik]

Так и сделала, он MouseDown создала Bitmap с скриншотом  TListBoxItem и двигаю этот Bitmap . Но  вертикальный скролл TListBox- а мешает . И не как не могу  сделать так, что пока  я двигаю этот Bitmap, вертикальный скролл TListBox- а не работала. 

[krapotkin]

можно битмап создавать на весь экран

[Astghik]

на весь экран создаю  TLayout, а потом на этом  TLayout- е двигаю Bitmap.

Layout1->BringToFront();
Application->ProcessMessages(); не помагает
пока не вызывается MouseUp,  вертикальный скролл TListBox- а работает

[krapotkin]

нет в андроиде никаких processMessages, забудьте

логично, list предположил, что вы нажали и ведете, пока ведете, он вас пасёт

нужно сказать ему, что уже отпустили палец. смотреть код и искать как отменить состояние скролла

может ярослав подскажет

[Astghik]

Нашлось какое то решение, не хорошое но работает.

OnMouseDown делаем клон оригинальной  ListBox - а, clonListBox  делаем  BringToFront, а  потом начинаем сваю работу на clonListBox.  

В канце (OnMouseUp)  clonListBox  отображаем  на оригинал  и  удаяем  clonListBox  .

Вот тестовый проект , правда,  нужны каррекции. (Rad Studio 10)

TestListBoxItmDrag.rar

[Евгений Корепов]

50 минут назад, Astghik сказал:

Нашлось какое то решение, не хорошое но работает.

OnMouseDown делаем клон оригинальной  ListBox - а, clonListBox  делаем  BringToFront, а  потом начинаем сваю работу на clonListBox.  

В канце (OnMouseUp)  clonListBox  отображаем  на оригинал  и  удаяем  clonListBox  .

Вот тестовый проект , правда,  нужны каррекции. (Rad Studio 10)

TestListBoxItmDrag.rar

Попробуйте на событие OnMouseDown делать ListBox1.HitTest:=False, а на OnMouseUp  ListBox1.HitTest:=True

[Astghik]

5 минут назад, Евгений Корепов сказал:

Попробуйте на событие OnMouseDown делать ListBox1.HitTest:=False, а на OnMouseUp  ListBox1.HitTest:=True

не помагает

Изменено 26 января, 2017 пользователем Astghik