Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Shiningemerald
 Аватар для Electroflower
384 / 117 / 22
Регистрация: 05.01.2012
Сообщений: 951

TImage, TIcon, GroupBox

30.07.2018, 17:02. Показов 1271. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Привет всем!
Возможно, снова глупый вопрос.
Нужно из ImageList подгрузить в Image иконку 32х32 пксл.
Пишу следующее:
C++
1
2
3
4
5
6
7
8
9
10
11
12
      Graphics::TIcon *icoArrow = new Graphics::TIcon;
      ImageListPopup->GetIcon(3,icoArrow);
     TImage *imgArrow  = new TImage(GroupBox1);
     imgArrow->Left = x-32;
     imgArrow->Top = y;
     imgArrow->Picture->Icon ->Height = 32;
     imgArrow->Picture->Icon->Width = 32;
     imgArrow->Picture->Icon->Handle = icoArrow;
     //
 
     delete icoArrow;
     delete imgArrow;
Иконка не отображается...как быть?
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
30.07.2018, 17:02
Ответы с готовыми решениями:

Создать прозрачную иконку TIcon
Требуется создать объект TIcon, который был бы заполнен прозрачным цветом. Сейчас я делаю так. Создаю файл *.ico нужного размера и заливаю...

ComboBox и GroupBox. Как правильно деактивировать GroupBox?
Как правильно сделать так, чтобы при выборе определённого пункта из менюшки ComboBox и нажатии кнопки, доступным становился нужный...

Преобразовать Ticon в TBitmap
Нужна функция, возвращяющяя Bitmap, параметром которой является Ticon. Пробывал вот это, не работает: function IconToBitmap(Icon:...

6
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33195 / 21491 / 8233
Регистрация: 22.10.2011
Сообщений: 36,880
Записей в блоге: 12
30.07.2018, 19:03
Лучший ответ Сообщение было отмечено Electroflower как решение

Решение

C++
1
2
     TImage *imgArrow  = new TImage(GroupBox1);
     imgArrow->Parent = GroupBox1; // Magic ?
Кстати, у меня без
C++
1
     imgArrow->Picture->Icon->Handle = icoArrow->Handle; // вот именно этого icoArrow->Handle
код вообще не откомпилировался.
1
Практикантроп
 Аватар для nick42
4841 / 2726 / 534
Регистрация: 23.09.2011
Сообщений: 5,798
31.07.2018, 00:46
На старых платформах компилируется (без ->Handle), но картинка не отображается. Как не отображается и при незакомментированных delete icoArrow; delete imgArrow;
1
Shiningemerald
 Аватар для Electroflower
384 / 117 / 22
Регистрация: 05.01.2012
Сообщений: 951
31.07.2018, 16:20  [ТС]
Цитата Сообщение от volvo Посмотреть сообщение
icoArrow->Handle; // вот именно этого icoArrow->Handle
это помогло, спасибо большое.
А можете подсказать почему ico подгружаются какими-то инвертированными. например все белые цвета черные и еще фон не прозрачный-тоже черным красит..
0
Практикантроп
 Аватар для nick42
4841 / 2726 / 534
Регистрация: 23.09.2011
Сообщений: 5,798
31.07.2018, 16:35
Если Вы иконки в ImageList грузили, то в его свойствах есть TrasparentColor, FillColor, - с ними можно поиграться. Да и на палитру самих иконок (bits for pixel) больше внимания.
1
Shiningemerald
 Аватар для Electroflower
384 / 117 / 22
Регистрация: 05.01.2012
Сообщений: 951
31.07.2018, 17:30  [ТС]
nick42, буду пробовать, большое спасибо за подмогу!
0
 Аватар для Maluda
1280 / 598 / 116
Регистрация: 18.08.2009
Сообщений: 832
07.08.2018, 16:07
Проверял на CBuilder 2010: картинка прозрачная, все цвета адекватные

C++
1
2
3
4
TImage *AImage = new TImage(this);
AImage->Parent = this;
 
ImageList1->GetIcon(4, AImage->Picture->Icon);
Миниатюры
TImage, TIcon, GroupBox  
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
07.08.2018, 16:07
Помогаю со студенческими работами здесь

Как по нажатию мыши менять TImage и перерисовывать на него bmp с другого TImage?
Есть два TImage. На Image1 картинка TBitmap, Image1 растянут на всю форму. При нажатии на Image1 и OnMouseMove var x1, y1: integer; ...

Мерцание компонента Timage и перемещение Timage при нажатии
Здравствуйте! Помогите убрать мерцание компонента Timage при изменении размера. Нашел в поиске, советуют так: procedure...

Propery Icon TIcon для собственного компонента унаследованного от TCustomControl
Добрый день! Возникла такая проблема. Создал своё компонент, всё работает. Понадобилось мне к этому компоненту добавить Параметр...

Could not find a match for 'TImage::TImage()'
Решил поработать с классами. Ну и заодно разобраться с firemonkey. Сразу же нарвался на такую штуку. Вроде в firemonkey есть TImage,...

GroupBox
Кто знает, что нужно применить для GroupBox, если для form1.ComboBox1.itemindex;. что подставить сюда form1.GroupBox1......; - вместо...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru