Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- private: System::Void MyForm_Paint(System::Object^ sender, System::Windows::Forms::PaintEventArgs^ e) {
- // описываем переменную g - область рисования, ссылку на объект типа System::Drawing::Graphics^
- Graphics^ g = e -> Graphics;
- // Закрасим всю область рисования g в некоторый цвет
- g -> Clear(Color::Aquamarine);
- // Определяем перья-элементы типа System::Drawing::Pen
- // У каждого пера имеются 2 хар-ки: цвет и толщина
- // Цвет обязательно передается в качестве пар-ма, толщина может быть задана по умолч.
- Pen^ redPen = gcnew Pen(Color::Red, 6);
- Pen^ bluePen = gcnew Pen(Color::Blue, 10);
- Pen^ greenPen = gcnew Pen(Color::Green, 5);
- // Начертим отрезки
- // Высота окна - this -> ClientRectangle.Height
- // Ширина окна - this -> ClientRectangle.Width
- // Начало координат в левом верхнем углу
- float h = this->ClientRectangle.Height;
- float w = this->ClientRectangle.Width;
- g->DrawLine(redPen, 0.0, 0.0, w, h);
- g->DrawLine(bluePen, 90.0, 50.0, w, 80.0);
- // Строим ромб:
- float h1 = h / 3, h2 = 2 * h1;
- float w1 = w / 3, w2 = 2 * w1;
- g->DrawLine(greenPen, w2, 0.0, w, h2);
- g->DrawLine(greenPen, w, h2, w1, h);
- g->DrawLine(greenPen, w1, h, 0.0, h1);
- g->DrawLine(greenPen, 0.0, h1, w2, 0.0);
- // Добавим надпись
- // Текст записывается кистью:
- SolidBrush^ drawBrush = gcnew SolidBrush(Color::Black);
- // Опишем шрифт
- System::Drawing::Font^ drawFont = gcnew System::Drawing::Font("Arial", 10);
- // Выведем надпись
- g->DrawString("Надпись на фоне", drawFont, drawBrush, 40, 100);
- }
- private: System::Void MyForm_Resize(System::Object^ sender, System::EventArgs^ e) {
- // Добавляем устойчивость рисунка относительно изменения размера окна
- Refresh();
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement