Delphi: FireMonkey

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Пытливый

3760 / 2264 / 705

Регистрация: 29.05.2013

Сообщений: 9,616

Почему у меня получаются все имиджи одного цвета?

21.12.2023, 19:07. Показов 698. Ответов 0

Метки нет (Все метки)

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

Вот что не так с кодом? Почему все имиджи добавленные в грид получают один и тот же цвет?

Delphi

begin
  var Bmp := TBitmap.Create(64,64);
  var RandomColor: TAlphaColorRec;
  for var i := 0 to 10
  do begin
     var Image := TImage.Create(GridLayout1);
     Image.Parent := GridLayout1;
     Image.Align := TAlignLayout.Client;
     RandomColor.R := 128+Random(128);
     RandomColor.G := 128+Random(128);
     RandomColor.B := 128+Random(128);
     Bmp.Canvas.BeginScene;
     Bmp.Canvas.Clear(RandomColor.Color);
     Bmp.Canvas.EndScene;
     Image.Bitmap.Assign(Bmp);
     end;
  Bmp.Free;
end;

Добавлено через 3 часа 23 минуты
Тут я разобрался. Альфу я не инициализирую, а она по умолчанию равна нулю и цвет просто прозрачный.

Заказать работу у эксперта

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

21.12.2023, 19:07

Ответы с готовыми решениями:

Почему, если выключить checkbox и label, то они получаются разного цвета
Добрый день! На интерфейсе несколько checkbox-ов и label-ов. В какой-то момент мне нужно...

Почему у меня в тестах показывает 60 и выше fps и всё плавно но на телефоне всё резко и как будто 30 фпс?
123

Закрыть все дочерний окна одного цвета
Помогите пожалуйста. у меня такое задания Написать программу, создающую на экране окно (главное...

Доказательство по индукции (Все кошки одного цвета)
Объясните, пожалуйста, смысл ошибки в следующем доказательстве. Докажем что все кошки в мире...

	21.12.2023, 19:07

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

21.12.2023, 19:07

Помогаю со студенческими работами здесь

Почему у меня все прыгает по экрану?
На странице есть список ссылок, при клике на каждую из которых появляется всплывающая форма. ...

Выяснить все ли клетки шахматной доски одного цвета
Здраствуйте, нам на оллимпиаду задали сделать 1 из програм но сколько бы во мне не было стремления...

Какова вероятность, что все шары одного цвета?
В первой урне 6 синих и 4 красных шара. Во второй урне 3 синих и 2 красных шаров. Из каждой урны...

Узнать все ли клетки шахматной доски одного цвета
Удалено

Найти вероятность того, что при вытягивании трех нитей окажется: 1) все нити одного цвета; б) все нити разных
2. В мешке смешаны нити трех цветов: белых 50%, красных – 30%, черных – 20%. Определить вероятность...

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

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи
Обработка текстовой информации hw_wired 28.01.2025 Введение в обработку текстовой информации В современном мире обработка текстовой информации играет фундаментальную роль в различных сферах человеческой деятельности. Текстовые редакторы стали. . .	Обработка графической информации hw_wired 28.01.2025 Введение в компьютерную графику Компьютерная графика стала неотъемлемой частью современного цифрового мира, пройдя впечатляющий путь развития от простейших черно-белых изображений до сложных. . .	Python в Алгоритмике: Решение задач hw_wired 28.01.2025 Введение в Python и Алгоритмику В современном мире программирование стало неотъемлемой частью образования и профессионального развития. Python зарекомендовал себя как один из самых популярных и. . .	Компьютер как универсальное устройство для работы с информацией hw_wired 28.01.2025 Введение в устройство компьютера Компьютер представляет собой универсальное электронное устройство, предназначенное для автоматической обработки информации. В современном мире компьютер стал. . .	Информация и информационные процессы hw_wired 28.01.2025 Понятие информации и ее виды В современном мире информация является одним из фундаментальных понятий, пронизывающих все сферы человеческой деятельности. Под информацией понимают любые сведения об. . .	Алгоритмика hw_wired 28.01.2025 Введение: Основы алгоритмики и её роль в информатике В современном мире программирование и алгоритмическое мышление стали неотъемлемой частью образования и профессиональной деятельности. . . .
Информационное моделирование hw_wired 28.01.2025 Введение в информационное моделирование В современном мире информационное моделирование стало неотъемлемой частью научной, образовательной и профессиональной деятельности. Это мощный инструмент. . .	Объекты и их имена hw_wired 28.01.2025 Введение: Основы объектного подхода и их роль в информатике В современном мире информационных технологий объектный подход стал фундаментальным принципом организации и обработки информации. Этот. . .	Элементы алгоритмизации hw_wired 28.01.2025 Основы алгоритмизации В современном мире алгоритмы играют фундаментальную роль в развитии информационных технологий и программирования. Понимание основ алгоритмизации является ключевым элементом в. . .	Человек и информация hw_wired 28.01.2025 Введение: роль информации в познании мира В современном мире информация играет фундаментальную роль в процессе познания окружающей действительности. Она представляет собой совокупность сведений об. . .	Компьютер и информация hw_wired 28.01.2025 Эволюция вычислительных машин История развития вычислительной техники начинается задолго до появления первых электронных устройств. Человечество всегда стремилось упростить процесс вычислений и. . .	Информационные технологии hw_wired 28.01.2025 Введение в современные технологии работы с информацией В современном мире информационные технологии стали неотъемлемой частью практически всех сфер человеческой деятельности. Они существенно. . .

Наверх