Drop в List - куда падаем?

Dias2004

При перетаскивании мышью (Drag and Drop) в List-box строка под курсором выделяется, то есть List-box "чувствует" мышь.
Как получить номер или какой-либо еще идентификатор строки, над которой находится курсор при перетаскивании, то есть как узнать, в какую запись List-box'a делается Drop?

Метод CHOICE возвращает выделенную строку таблицы, но это не то -никакие движения мышью с зажатой кнопкой выделенную строку не изменяет.

Кто сталкивался с проблемой, помогите пожалуйста.

Ravenous

Попробуй так
Row# = ?MyListBox{PROPList:MouseUpRow}

Dias2004

Спасибо, все работает.

morkovin · Сообщение **morkovin** » 26 Июль 2020, 11:57

Тоже столкнулся с этой проблемой

Попробуй так
Row# = ?MyListBox{PROPList:MouseUpRow}

Да, я получаю Row#, но как узнать ID (

или какой-либо еще идентификатор строки

)этой записи по Row# ?

Dias2004 писал(а): 31 Январь 2006, 16:32 При перетаскивании мышью (Drag and Drop) в List-box строка под курсором выделяется, то есть List-box "чувствует" мышь.
Как получить номер или какой-либо еще идентификатор строки, над которой находится курсор при перетаскивании, то есть как узнать, в какую запись List-box'a делается Drop?

Метод CHOICE возвращает выделенную строку таблицы, но это не то -никакие движения мышью с зажатой кнопкой выделенную строку не изменяет.

Кто сталкивался с проблемой, помогите пожалуйста.

Игорь Столяров

morkovin писал(а): 26 Июль 2020, 11:57 Да, я получаю Row#, но как узнать ID (

Код: Выделить всё

  Get(BrowseQueue,Row#)

Далее из записи получаем ID, а по нему и саму запись (если нужно).

morkovin · Сообщение **morkovin** » 26 Июль 2020, 12:38

Игорь Столяров писал(а): 26 Июль 2020, 12:05
morkovin писал(а): 26 Июль 2020, 11:57 Да, я получаю Row#, но как узнать ID (
Код: Выделить всё
  Get(BrowseQueue,Row#)  
Далее из записи получаем ID, а по нему и саму запись (если нужно).

Спасибо! Понял!
Вот так сделал:

Код: Выделить всё

loc:KTP_ID = DROPID()   ! Retrieve the passed string
Row# = ?Browse:1{PROPList:MouseUpRow}

GET(Queue:Browse:1,ROW#)
IF ERRORCODE() THEN
    STOP(ERROR())
ELSE
    MESSAGE(Queue:Browse:1.BAP:SysId,Row#)
    BAP:SysId=Queue:Browse:1.BAP:SysId
END

З.Ы. Юзеры обленились. Не хотят по кнопочкам из справочников выбирать - хотят просто мышкой перетаскивать значения из справочников.

kreator · Сообщение **kreator** » 26 Июль 2020, 16:09

morkovin писал(а): 26 Июль 2020, 12:38 З.Ы. Юзеры обленились. Не хотят по кнопочкам из справочников выбирать - хотят просто мышкой перетаскивать значения из справочников.

Знаете какой прикол с Drag-n-Drop в List? Со включенным Drag-n-Drop'ом прокрутка пальцами не работает. Сомневаюсь, что починили.

gopstop2007

kreator писал(а): 26 Июль 2020, 16:09 Знаете какой прикол с Drag-n-Drop в List? Со включенным Drag-n-Drop'ом прокрутка пальцами не работает. Сомневаюсь, что починили.

Приколы еще в windows 10 в зависимости от привилегий пользователей и под кем запущено приложение.

morkovin писал(а): 26 Июль 2020, 11:57 Да, я получаю Row#, но как узнать ID (

делаю проще, завожу глобальную на эту запись по уникальному id, пригодится для многих случаев (например печать ...)
когда выбирается запись в которую будет drop, присваевается глобальная id, когда бросаем на нее drop - id уже известен
но похоже не Ваш случай, Вы бросаете в разные записи Queue