Компонент TImage

@Korbofos · Регистрация: 15.08.2011

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

Рисую фигуру на TImage, остальное автоматически заливается белым, как этого избежать? Нужно что бы остальная часть осталась цветом как у формы.

C++
1
2
Form1->Image1->Canvas->Brush->Color=clBlack;
Form1->Image1->Canvas->Ellipse(0,0,160,160);

@Gremlin · 18.02.2013, 12:31

C++
1
2
3
    Form1->Image1->Transparent = true;
    Form1->Image1->Canvas->Brush->Color = clBlack;
    Form1->Image1->Canvas->Ellipse(0, 0, 160, 160);

@Korbofos · 18.02.2013, 12:48 **[ТС]**

Сообщение от Gremlin

C++
1
2
3
    Form1->Image1->Transparent = true;
    Form1->Image1->Canvas->Brush->Color = clBlack;
    Form1->Image1->Canvas->Ellipse(0, 0, 160, 160);

Так только белый фон остался, а самого полу круга не видно

@Gremlin · 18.02.2013, 13:01

Сообщение от Korbofos

Так только белый фон остался, а самого полу круга не видно

какой пол? может пример как это должно выглядеть, а то не совсем понятно

@Korbofos · 18.02.2013, 13:10 **[ТС]**

С права рисую в paintbox'e слева в timage c Transparent = true. Должно быть как paintbox'e.

@Gremlin · 18.02.2013, 13:29

странно, у меня так и выходит

@Korbofos · 18.02.2013, 13:39 **[ТС]**

А можно код?

Добавлено через 3 минуты
Версия билдера 6

Добавлено через 26 секунд
что-то пошло не так

@Gremlin · 18.02.2013, 13:46

Сообщение от Korbofos

А можно код?

C++
1
2
3
4
5
6
7
Form1->Image1->Transparent = true;
Form1->Image1->Canvas->Brush->Color = clBlack;
Form1->Image1->Canvas->Ellipse(0, 0, 160, 160);
 
Form1->Image2->Transparent = false;
Form1->Image2->Canvas->Brush->Color = clBlack;
Form1->Image2->Canvas->Ellipse(0, 0, 160, 160);

Сообщение от Korbofos

Версия билдера 6

угу, 6ой

@Korbofos · 18.02.2013, 14:30 **[ТС]**

Всё также, что ему надо не понятно

Добавлено через 38 минут
Кажись понял, у меня круг выходит за рамки компонента. Когда сделал компонент timage для всего круга белого фона не было, но мне нужен полу круг на весь timage

Добавлено через 3 минуты
Каким ещё методом можно нарисовать закрашенный полу круг?

@Gremlin · 18.02.2013, 15:02

C++
1
2
3
    Image1->Transparent = true;
    Image1->Canvas->Brush->Color = clBlack;
    Image1->Canvas->Pie(0,0,100,100,0,50,50,50);

@Korbofos · 19.02.2013, 09:23 **[ТС]**

Опробовал прогу дома на другом компе, изображение почему то мерцает

Добавлено через 9 минут
И Transparent = true не работает.

Добавлено через 13 часов 26 минут
Решил все проблемы может кому тоже поможет.
С мерцанием

C++
1
Image->Parent->DoubleBuffered=true;

С прозрачностью так и не получилось. Решил так, отключил прозрачность

C++
1
2
3
4
5
6
7
Form_Main->Image->Canvas->Pen->Width = 1;
Form_Main->Image->Canvas->Brush->Color=Form_Main->Color;// цвет заливки берём у формы
Form_Main->Image->Canvas->Pen->Color=Form_Main->Color;  // цвет кисти также
Form_Main->Image->Canvas->Rectangle(0,0,160,80);             //закрашиваем всю область image 
Form_Main->Image->Canvas->Pen->Color=clBlack;                 
Form_Main->Image->Canvas->Brush->Color=clBlack;
Form_Main->Image->Canvas->Pie(0,0,160,160,160,80,0,80);

@TheDarkMax2 · 21.02.2013, 15:33

Мерцает? Хм... обычно такое когда движение рисуют.

C++
1
Image->Parent->DoubleBuffered = true;

Обычно это помогает от мерцания.

Ой, извините Невнимательно читал

А что будет на фоне? Может просто закрасить тем же цветом???

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

@Korbofos 11 / 11 / 2 Регистрация: 15.08.2011 Сообщений: 456
	18.02.2013, 13:10 [ТС]
	С права рисую в paintbox'e слева в timage c Transparent = true. Должно быть как paintbox'e. Миниатюры 0

@Gremlin 519 / 307 / 58 Регистрация: 30.07.2008 Сообщений: 607
	18.02.2013, 13:29
	странно, у меня так и выходит Миниатюры 0

@Korbofos 11 / 11 / 2 Регистрация: 15.08.2011 Сообщений: 456
	18.02.2013, 13:39 [ТС]
	А можно код? Добавлено через 3 минуты Версия билдера 6 Добавлено через 26 секунд что-то пошло не так 0

@Korbofos 11 / 11 / 2 Регистрация: 15.08.2011 Сообщений: 456
	18.02.2013, 14:30 [ТС]
	Всё также, что ему надо не понятно Добавлено через 38 минут Кажись понял, у меня круг выходит за рамки компонента. Когда сделал компонент timage для всего круга белого фона не было, но мне нужен полу круг на весь timage Добавлено через 3 минуты Каким ещё методом можно нарисовать закрашенный полу круг? 0