Вверх ↑
Этот топик читают: Гость
Ответов: 2202
Рейтинг: 675
#31: 2024-04-23 14:41:04 ЛС | профиль | цитата
А это проблема и до моей правки была:
error_edit.png
карма: 11

0
Разработчик
Ответов: 26068
Рейтинг: 2121
#32: 2024-04-23 14:57:55 ЛС | профиль | цитата
Всем Привет!
Посмотрел, буду добавлять. А со сдвигом текста, так это на уровне библиотеки так сделано

  if FRedaction then
Control := NewListEdit(FParent, FStyle, l, LgIList, SmIList, StIList,
_OnLineChange, _OnBeforeLineChange)
else
Control := NewListView(FParent, FStyle, l, LgIList, SmIList, StIList);

Как видно, создание контрола привязано к списку иконок. И если его нет, то библиотека отрисовывает дефолтно. Припоминаю, что что-то пытались думать по этому вопросу, но что-то не сдвинулось.

Короче, почитал Маркса (то бишь Кладова). Вот что он пишет
Событие OnMeasureItem (см. метод Set_LVItemHeight) может использоваться при наличии стиля lvoOwnerDrawFixed для того, чтобы программно задать высоту элемента, если высота, устанавливаемая системой по умолчанию, не устраивает. Лично я чаще использую другой способ: назначаю объекту список изображений (в соответствии с режимом просмотра - список для больших или маленьких пиктограмм, в зависимости от используемых режимов просмотров). Размер (высота) пиктограммы в таком списке изображений однозначно определяет и высоту элементов, лишь бы он был больше, чем высота используемого шрифта (если шрифт больше, то высота элемента устанавливается системой так, чтобы текст полностью входил по высоте). Если сам список изображений не используется, его необязательно заполнять чем-нибудь. Достаточно пустого списка, чтобы задать требуемую высоту элемента.

Вот как раз его способ и вошел в основу компонента

Редактировалось 1 раз(а), последний 2024-04-23 15:12:57
карма: 22

0
Ответов: 2202
Рейтинг: 675
#33: 2024-04-23 15:16:19 ЛС | профиль | цитата
nesco, привет! А есть мысли почему у Gunta нормально работает, а у нас с ошибкой. Насколько разобрался в коде, то не должно было работать или что-то не учел?
карма: 11

0
Разработчик
Ответов: 26068
Рейтинг: 2121
#34: 2024-04-23 15:19:36 ЛС | профиль | цитата
Не должен работать, тк действительно BRect нигде не назначен
карма: 22

0
Ответов: 700
Рейтинг: 145
#35: 2024-04-23 15:20:07 ЛС | профиль | цитата
nesco писал(а):
со сдвигом текста, так это на уровне библиотеки так сделано

Вернул свой файл обратно… Сдвига текста нет…
test edit With_EditCtr.png
карма: 15

0
Разработчик
Ответов: 26068
Рейтинг: 2121
#36: 2024-04-23 15:22:50 ЛС | профиль | цитата
Странно как-то, но эта шняга никак не зависит от отрисовщика. Это вообще работает привязанный Edit Control

--- Добавлено в 2024-04-23 15:39:10

Вот оба оригинальных файла, что пример, что компонент
test_1011010.png

--- Добавлено в 2024-04-23 15:42:50

Достаточно отключить точку doHeight у Edit Controla, как все начинает нормально работать
test_1011011.png

--- Добавлено в 2024-04-23 15:49:48

Ganta, я заметил, что у тебя высота шрифта внутри Edit Controlа отличается от высоты шрифта внутри таблицы

Редактировалось 5 раз(а), последний 2024-04-23 15:49:48
карма: 22

0
Ответов: 700
Рейтинг: 145
#37: 2024-04-23 15:50:21 ЛС | профиль | цитата
nesco писал(а):
Странно как-то, но эта шняга никак не зависит от отрисовщика. Это вообще работает привязанный Edit Control

На всякий случай, выкладываю свой hiMST_DrawManager.pas и свой файл примера.
https://forum.hiasm.com/getfile/39671
карма: 15

0
файлы: 1My_DrawManager.zip [8.7KB] [71]
Разработчик
Ответов: 26068
Рейтинг: 2121
#38: 2024-04-23 15:54:40 ЛС | профиль | цитата
У тебя шрифт в таблице 12, а в Edit Control-e -- 10. ЧТД
В оригинальном файле примера там все 10-ки
карма: 22

0
Ответов: 700
Рейтинг: 145
#39: 2024-04-23 16:19:43 ЛС | профиль | цитата
nesco писал(а):
У тебя шрифт в таблице 12, а в Edit Control-e -- 10. ЧТД
В оригинальном файле примера там все 10-ки

Упсс.. Стесняюсь очки носить.
карма: 15

0
Разработчик
Ответов: 26068
Рейтинг: 2121
#40: 2024-04-23 16:24:35 ЛС | профиль | цитата
Короче, пофиксил я эту шнягу на SVN, немного (не принципиально) подкорректировав код от sla8a
карма: 22

0
40
Сообщение
...
Прикрепленные файлы
(файлы не залиты)