Как изменить цвет пера?

@Shpion007 · Регистрация: 22.10.2012

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

Доброго времени суток,
такая задача имеется форма с кнопкой, на канве формы средствами апи осуществляется рисование, так как изменить цвет пера?
этим

C++
1
Form1->Canvas->Pen->Color=RGB(0,255,0);

и этим

C++
1
CreatePen(PS_SOLID, 2,  RGB(0, 0, 255));

у меня не получается.

Вот к примеру код простейшей программы:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
HDC hDC = GetDC(Form1->Handle);
Ellipse(hDC, 0, 0, 250, 250);
}
//---------------------------------------------------------------------------

@Nixy · 05.01.2013, 16:20

перо отвечает за контур,если вас интересует заливка используйте Brush, и да вам в другой раздел)

@taras atavin · 05.01.2013, 16:20

В языке нет самого понятия пера, а если это объект GDI, OpenGL, или ещё какой библиотеки, то теме место в разделе сисемно-зависимого программирования на плюсах, или в разделе билдера.

@Nixy · 05.01.2013, 16:21

и в вашем простейшем коде нету изменения цвета пера

Добавлено через 48 секунд
taras atavin, товарищу в раздели Builder'а надо

Croessmah · 05.01.2013, 16:23

После создания пера CreatePen, нужно еще прикрепить его к контексту SelectObject

@Nixy · 05.01.2013, 16:25

да вполне такая конструкция должна работать

C++
1
    Form1->Canvas->Pen->Color=RGB(0,255,0);

@taras atavin · 05.01.2013, 16:27

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

да вполне такая конструкция должна работать

C++
1
Form1->Canvas->Pen->Color=RGB(0,255,0);

Да. Только это не API, а vcl.

@Shpion007 · 05.01.2013, 16:37 **[ТС]**

Программа - это пример, но да, мне и контур нужен, т. к. нужно прямые рисовать.

@Nixy · 05.01.2013, 16:50

taras atavin, так это не я в WinApi перенес тему, очевидные мне знакомые конструкции относятся именно к vcl buildera и тему туда надо было

Добавлено через 53 секунды

C++
1
 Form1->Canvas->Pen->Color=clRed

попробуйте так

@Shpion007 · 05.01.2013, 16:53 **[ТС]**

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

попробуйте так

Попробовал, не получается.

@taras atavin · 05.01.2013, 16:53

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

так это не я в WinApi перенес тему, очевидные мне знакомые конструкции относятся именно к vcl buildera и тему туда надо было

API хотел ТС.

@Nixy · 05.01.2013, 17:44

покажите код который вы используете

Добавлено через 24 секунды
taras atavin, где Оо

@Shpion007 · 05.01.2013, 18:14 **[ТС]**

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

покажите код который вы используете

Это мне?
Если да, то вот ПРИМЕР:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
HDC hDC = GetDC(Form1->Handle);
Ellipse(hDC, 0, 0, 250, 250);
}
//---------------------------------------------------------------------------

@Nixy · 05.01.2013, 18:28

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

и в вашем простейшем коде нету изменения цвета пера

да вам

@Shpion007 · 05.01.2013, 20:08 **[ТС]**

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

и в вашем простейшем коде нету изменения цвета пера

Долгая здесь история, он пришли мы к тому, чтобы использовать многопоточность и рисование на форме нужно использовать рисование апи, поэтому и возник вопрос: как изменять цвет рисования рисуя средствами апи на форме.
А нет изменения потому что я не знаю как это сделать (это логично), могу я хотя где то в коже дописать

C++
1
Form1->Canvas->Pen->Color=RGB(0,255,0);

но это не работает.

Добавлено через 1 час 32 минуты

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

После создания пера CreatePen, нужно еще прикрепить его к контексту SelectObject

Это как, подскажете, хорошо было бы с примером?

@Nixy · 05.01.2013, 21:41

я так и не понял почему у вас не получается и чего вы хотите

@taras atavin · 05.01.2013, 21:51

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

где Оо

В первом посте.

@Nixy · 05.01.2013, 22:49

delete увидел

Новые блоги и статьи Все статьи Все блоги /
Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .	Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .

@Nixy ComfyMobile 401 / 282 / 34 Регистрация: 24.07.2012 Сообщений: 916
	05.01.2013, 16:20
	перо отвечает за контур,если вас интересует заливка используйте Brush, и да вам в другой раздел) 0

@taras atavin 4226 / 1796 / 211 Регистрация: 24.11.2009 Сообщений: 27,562
	05.01.2013, 16:20
	В языке нет самого понятия пера, а если это объект GDI, OpenGL, или ещё какой библиотеки, то теме место в разделе сисемно-зависимого программирования на плюсах, или в разделе билдера. 0

@Nixy ComfyMobile 401 / 282 / 34 Регистрация: 24.07.2012 Сообщений: 916
	05.01.2013, 16:21
	и в вашем простейшем коде нету изменения цвета пера Добавлено через 48 секунд taras atavin, товарищу в раздели Builder'а надо 0

Croessmah Неэпический 18144 / 10728 / 2066 Регистрация: 27.09.2012 Сообщений: 27,026 Записей в блоге: 1
	05.01.2013, 16:23
	После создания пера CreatePen, нужно еще прикрепить его к контексту SelectObject 0

@Shpion007 0 / 0 / 0 Регистрация: 22.10.2012 Сообщений: 40
	05.01.2013, 16:37 [ТС]
	Программа - это пример, но да, мне и контур нужен, т. к. нужно прямые рисовать. 0

@Nixy ComfyMobile 401 / 282 / 34 Регистрация: 24.07.2012 Сообщений: 916
	05.01.2013, 17:44
	покажите код который вы используете Добавлено через 24 секунды taras atavin, где Оо 0

@Nixy ComfyMobile 401 / 282 / 34 Регистрация: 24.07.2012 Сообщений: 916
	05.01.2013, 21:41
	я так и не понял почему у вас не получается и чего вы хотите 0

@Nixy ComfyMobile 401 / 282 / 34 Регистрация: 24.07.2012 Сообщений: 916
	05.01.2013, 22:49
	delete увидел 0