Как изменить расцветку поля List1

@Дмитри5 · Регистрация: 28.09.2010

Студворк — интернет-сервис помощи студентам

Имеется List1 на форме, но раскрыт только на одну строку!
Если я выберу строку, то она станет почти невидимой: фон темный. Для плохого зрения - очень неприятно: нужно долго рассматривать текст.
Как сделать его другим цветом и посветлее, что бы можно было свободно читать визуально текст!!!
Спасибо
Поздравляю с наступающим НОВЫМ 2005 годом. Всем всякческих благ!!!

08.03.2011, 16:45

Через 'owner draw':
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/listboxes/aboutlistboxes.asp?frame=true#ownerdrawn _boxes

@Дмитри5 · 09.03.2011, 13:15 **[ТС]**

Спасибо, но если честно: я не сумел там найти ничего... - аглицким я текстом не владею !!!
Нужен конкретный пример. То что я взял: мой комп ругается - на Dim lItem as Listitem (это уже по памяти!)

09.03.2011, 13:19

Стоп: ты говоришь про листбокс (штатный VB-шный контрол) или же про листвью (ListView из пакета MS Windows Common Controls)?!

09.03.2011, 13:20

И ещё: если нужно менять цвета у всего контрола в целом - то используй просто свойства BackColor и ForeColor; а вот если нужно у индивидуального элемента (по опред. критерию) - то тогда мне сначала нужен ответ на мой предыдущий вопрос.

@Дмитри5 · 09.03.2011, 14:48 **[ТС]**

Comanche, Привет!
Я использую стандартный Listbox что в инструментах.
И раскрываю его только на одну строку. Потому что их на форме уже 6 шт.
Каждая строка записана с данными, в часности через vbtab. Потом я устанавливаю на нужную строку и читаю их...
Ну я захотел, что бы при Scroll которую я строку вижу в данный момент не кликать, а програмно прочесть и взять данные. Все это уже отлажено, т.е. не кликая по строке ее вижу зрительно. Но если добросовестно кликать буду, то мне не видно, что написано (трудно читаемо) - фон становится темным (не черный, а буквы остались чернвми). А при Scroll - фон белый и читабельно. Вот я и вцепился в это!

@Дмитри5 · 09.03.2011, 14:55 **[ТС]**

Пардон'с .. а вообще-то на темном фоне буквы становятся белыми
Так что давайте снимем вопрос, не стоит 'овчинка выделки'!
И я непонимаю - тогда менять цвет букв и фона одновременно программно. Тогда вообще снимется вопрос, т.к. других свойств Listbox не имеет.
Спасибо!

09.03.2011, 14:57

Я так и ничего и не понял. Неважно: на сайте VBNET.RU, в разделе 'Примеры', есть навороченный листбокс от автора 'sne'. Он выполнен в виде класса (а не контрола), поскольку создаётся полностью через АПИ (CreateWindowEx и т.д.). В частности, он позволяет творить с цветами всё, что угодно.

Больше посоветовать ничего не могу.

Новые блоги и статьи Все статьи Все блоги /
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .

@Дмитри5 0 / 0 / 0 Регистрация: 28.09.2010 Сообщений: 139

	Как изменить расцветку поля List1 08.03.2011, 16:09. Показов 1109. Ответов 7 Метки нет (Все метки) Имеется List1 на форме, но раскрыт только на одну строку! Если я выберу строку, то она станет почти невидимой: фон темный. Для плохого зрения - очень неприятно: нужно долго рассматривать текст. Как сделать его другим цветом и посветлее, что бы можно было свободно читать визуально текст!!! Спасибо Поздравляю с наступающим НОВЫМ 2005 годом. Всем всякческих благ!!! 0

Comanche
	08.03.2011, 16:45
	Через 'owner draw': http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/listboxes/aboutlistboxes.asp?frame=true#ownerdrawn _boxes

@Дмитри5 0 / 0 / 0 Регистрация: 28.09.2010 Сообщений: 139
	09.03.2011, 13:15 [ТС]
	Спасибо, но если честно: я не сумел там найти ничего... - аглицким я текстом не владею !!! Нужен конкретный пример. То что я взял: мой комп ругается - на Dim lItem as Listitem (это уже по памяти!) 0

Comanche
	09.03.2011, 13:19
	Стоп: ты говоришь про листбокс (штатный VB-шный контрол) или же про листвью (ListView из пакета MS Windows Common Controls)?!

Comanche
	09.03.2011, 13:20
	И ещё: если нужно менять цвета у всего контрола в целом - то используй просто свойства BackColor и ForeColor; а вот если нужно у индивидуального элемента (по опред. критерию) - то тогда мне сначала нужен ответ на мой предыдущий вопрос.

@Дмитри5 0 / 0 / 0 Регистрация: 28.09.2010 Сообщений: 139
	09.03.2011, 14:48 [ТС]
	Comanche, Привет! Я использую стандартный Listbox что в инструментах. И раскрываю его только на одну строку. Потому что их на форме уже 6 шт. Каждая строка записана с данными, в часности через vbtab. Потом я устанавливаю на нужную строку и читаю их... Ну я захотел, что бы при Scroll которую я строку вижу в данный момент не кликать, а програмно прочесть и взять данные. Все это уже отлажено, т.е. не кликая по строке ее вижу зрительно. Но если добросовестно кликать буду, то мне не видно, что написано (трудно читаемо) - фон становится темным (не черный, а буквы остались чернвми). А при Scroll - фон белый и читабельно. Вот я и вцепился в это! 0

@Дмитри5 0 / 0 / 0 Регистрация: 28.09.2010 Сообщений: 139
	09.03.2011, 14:55 [ТС]
	Пардон'с .. а вообще-то на темном фоне буквы становятся белыми Так что давайте снимем вопрос, не стоит 'овчинка выделки'! И я непонимаю - тогда менять цвет букв и фона одновременно программно. Тогда вообще снимется вопрос, т.к. других свойств Listbox не имеет. Спасибо! 0

Comanche
	09.03.2011, 14:57
	Я так и ничего и не понял. Неважно: на сайте VBNET.RU, в разделе 'Примеры', есть навороченный листбокс от автора 'sne'. Он выполнен в виде класса (а не контрола), поскольку создаётся полностью через АПИ (CreateWindowEx и т.д.). В частности, он позволяет творить с цветами всё, что угодно. Больше посоветовать ничего не могу.