[Помидоркин]

Понимаю что вопрос достаточно невнятный. Буду благодарен за любую подсказку в каком направлении копать.
Хочу сделать компонент аналог области файлов ADCSee, т.е. формально это список, но элементы расположены как иконки в проводнике, с возможностью изменения сортировки перетаскиванием.
Пока смутно представляю как подойти к решению, либо создавать с нуля, либо, возможно, существует подобный компонент.
Если создавать с нуля, какие компоненты выбрать в качестве родителей для элемента списка и для области в которой эти элементы будут располагаться.

[lmikle]

Если нужен готовый, то ищи EasyListView
Если сам, то я делал на основе TScrollBox. Item'ы на основе TGraphicControl.

[Admin]

Сообщение от Помидоркин

Понимаю что вопрос достаточно невнятный. Буду благодарен за любую подсказку в каком направлении копать.
Хочу сделать компонент аналог области файлов ADCSee, т.е. формально это список, но элементы расположены как иконки в проводнике, с возможностью изменения сортировки перетаскиванием.
Пока смутно представляю как подойти к решению, либо создавать с нуля, либо, возможно, существует подобный компонент.
Если создавать с нуля, какие компоненты выбрать в качестве родителей для элемента списка и для области в которой эти элементы будут располагаться.

Есть у нас уже готовый вариант https://delphisources.ru/pages/sourc...ls-viewer.html

[Помидоркин]

Сообщение от lmikle

...я делал на основе TScrollBox. Item'ы на основе TGraphicControl.

Спасибо.
Item'ы сделал на основе TCustomControl. В ScrollBox-е все отрисовывается.
Как дальше ума не приложу. Собственно нужна сортировка внутри ScrollBox. Drag&Drop - ни как не могу въехать, а главное, есть серьезные сомнения в этом варианте.
То ли обрабатывать MouseDown, MouseMove ..., опять же с какого боку зайти к решению?

[lmikle]

Да, именно обрабатывать сообщения от мышки и клавишь.
А как ты хотел? Написание компонентов гораздо более сложная задача, чем создание просто программ...
По поводу сортировки - фактически это сортировка списка Item'ом и вычисление координат для них:
1. Отсортировать список в нужном порядке (пусть ты используешь для хранения Item'ов какой-либо список, например TObjectList). У списков есть метод, AlphaSort если не ошибаюсь. В него передается функция-компаратор, обеспечивающая именно сравнение итемов. Т.е. саму сортироку тебе писать не надо.
2. Вычисляем кол-во Item'ов по ширине - пусть nWidth
3. Теперь для каждого Item'а вычисляем его координаты. Для этого сначала надо вычислить строку путем деления нацело на nWidth, потом столбец - отстаток от деления на nWidth. Ну и последнее - X и Y вычисляются путем умножения полученых ранее значений на ширину и высоту Item'а (с отступами сам разберешься).
Правда это все работает при одинаковых размервх Item'ов. Если у них размеры разные, то алгоритм будет сложнее и зависит от того, как ты хочешь отображать такие разнообразные элементы после сортировки.

[Помидоркин]

Сообщение от lmikle

Да, именно обрабатывать сообщения от мышки и клавиш...

Спасибо. Как минимум не нужно тратить время на то что бы разбираться с Drag&Drop.
С вычислениями, думаю, проблем не будет, все элементы одного размера и количество столбцов фиксированное.