Total Commander

yozhik · (Separately) Posted: Thu Aug 10, 2023 20:07 Post subject:

Loopback
Возвращаясь к нулевым вызовам. Сегодня смог сосредоточиться и сгенерил краткий код для воспроизведения. Окружение: Win 10 x64, TC 11.00 32/64. Подопытные: два диалога cm_PackFiles и cm_SetAttrib. Запускаем 32-битный TC.
Вот так ни у одной кнопки в диалогах не будет текста "B1":

Loopback · Joined: 07 Sep 2009 Posts: 1530

yozhik
Да, спасибо, нашел и исправил. Не устанавливался текст для первого контрола каждого класса.

Установку значков для кнопок добавил. Поскольку можно отображать значок вместе с текстом, решил оставить такую возможность. Поэтому значок устанавливается отдельным параметром. Например:

yozhik · (Separately) Posted: Fri Aug 11, 2023 18:09 Post subject:

Loopback
Спасибо!
В светлой теме с иконками красота и порядок:

А в тёмной не назначаются:

Loopback · Joined: 07 Sep 2009 Posts: 1530

yozhik
Вот как всегда, то, что казалось простым, оказывается гораздо сложнее. Совершенно забыл про вселенское зло в виде тёмной темы и не проверил, иначе бы сразу выдал отрицательное заключение и даже не тратил бы время...

Похоже, в тёмной теме тотал сам управляет отрисовкой всех контролов. Метод установки значка, естественно, не работает. Вернее, он работает, но тотал его закрашивает. Попробовал сам отрисовать значок, бесполезно, при наведении на кнопку он опять закрашивается. Так что видимо увы. Делать сабклассинг или что-то такое, чтобы постоянно перерисовывать за тоталом значки - ну честно говоря перебор. И что теперь делать непонятно, оставлять половинчатое решение вроде как-то не очень.

yozhik · (Separately) Posted: Fri Aug 11, 2023 23:19 Post subject:

lz57005 · Joined: 05 Mar 2020 Posts: 28

yozhik · (Separately) Posted: Fri Aug 11, 2023 23:43 Post subject:

lz57005 · Joined: 05 Mar 2020 Posts: 28

yozhik

По сути Гислер в очередной раз взял и изобрёл по своему существующее в данном случае https://www.delphistyles.com/vcl/index.html это, но криво и олдскульно в своём стиле, все эти скины по ссылке, у меня даже частично получилось применить к тоталу

Например так

https://ibb.co/TPpmtDp

yozhik · (Separately) Posted: Fri Aug 11, 2023 23:52 Post subject:

Loopback
Вот, кстати, только что пришло в голову, проверил и вроде получается вовсе неплохо. При записи следующего вида:

lz57005 · Joined: 05 Mar 2020 Posts: 28

yozhik именно, мне кажется любой кодер на паскале/лазаре/дельфи охренет с кода который пишется в одно лицо уже 30 лет, пусть и с комментами

Loopback · Joined: 07 Sep 2009 Posts: 1530

Ну вроде бы что-то и получилось, хотя все-таки пришлось самостоятельно отрисовывать кнопку. Насколько это всё надежно надо тестировать.

Поскольку вариант значок+текст в данный момент весьма проблематичен, да и вообще как мне кажется, смысла в нём мало, уберу этот вариант и оставлю только значок. Тогда отдельный параметр для пути к значку будет не нужен, он будет задаваться вместо текста, а то, что его надо интерпретировать как путь к значку - переключателем /I:nn (он будет обязателен). Так оно и логичнее получится.

yozhik · (Separately) Posted: Sat Aug 12, 2023 06:23 Post subject:

Loopback · Joined: 07 Sep 2009 Posts: 1530

ModifyDialogs 2023-08-12

Дополнительный параметр убран, теперь путь задается в том же параметре, что и текст, а что будет выводиться определяется наличием переключателя /I (также можно через двоеточие указать размер значка, по умолчанию 16). Метод вывода значка переключается в зависимости от включенной темы (берется из настроек TC, но нужно ещё проверять при значении ключа 1), цвета для отрисовки тоже читаются из конфигурации TC.

Кстати, ещё забыл выложить здесь исправленную версию Tweaks, после этого и этого багрепорта, а там вышло прилично изменений.

Tweaks 2023-06-24

- исправлена работа с переменными в командной записи
- исправлена работа с файлами UTF-16
- исправлен парсинг длинных строк в файлах *.bar
- снят лимит количества пунктов меню

yozhik · ModifyDialogs 2023-08-12

Loopback · Joined: 07 Sep 2009 Posts: 1530

yozhik
Поправил...