ПРИЛОЖЕНИЕ К ГЛАВЕ 1
Окно среды PascalABC.Net (при создании проекта Windows Form)
Опции компилятора, при которых сохраняется ехе файл
Открыть окно Настройки (команда меню Сервис • Настройки).
В разделе Опции компиляции снять галочку с опции Удалять EXE файл после выполнения.
Цветовые константы
Работа с графикой
Свойство Pen (карандаш) позволяет определять цвет, толщину линий. Создание:
Pen p_c := new Pen(Color.Black, 1); — карандаш черного цвета, толщиной в 1 пиксель.
Свойство Brush (кисть) предназначено для заполнения областей заданным шаблоном. Создание: SolidBrush sb := new SolidBrush(Color.Blue); — кисть синего цвета.
Методы Graphics позволяют строить графические изображения. Во многом методы похожи на аналогичные команды построения графических изображений в среде PascalABC.Net.
| Краткое описание некоторых методов graphics | |
| DrawArc(Pen, Rectangle, Single, Single) |
Рисует дугу, которая является частью эллипса, заданного структурой Rectangle и двумя радиальными линиями
|
| DrawEllipse(Pen, Rectangle) | Рисует эллипс |
| DrawLine(Pen, Point, Point) | Проводит линию, соединяющую две структуры Point |
| DrawPie(Pen, Rectangle, Single, Single) |
Рисует сектор, который определяется эллипсом, заданным структурой Rectangle и двумя радиальными линиями
|
| DrawRectangle(Pen, Rectangle) |
Рисует прямоугольник, определяемый структурой Rectangle
|
| DrawString(String, Font, Brush, PointF) |
Создает указываемую текстовую строку в заданном месте с помощью определяемых объектов Brush и Font
|
| FillEllipse(Brush, Rectangle) |
Заполняет внутреннюю часть эллипса, определяемого ограничивающим прямоугольником, который задан структурой Rectangle
|
| FillPie(Brush, Rectangle, Single, Single) |
Заполняет внутреннюю часть сектора, определяемого эллипсом, который задан структурой Rectangle, и двумя радиальными линиями
|
| FillPolygon(Brush, Point[]) |
Заполняет внутреннюю часть многоугольника, определяемого массивом точек, заданных структурами Point
|
| FillRectangle(Brush, Rectangle) |
Заполняет внутреннюю часть прямоугольника, определяемого структурой Rectangle
|
Структура Rectangle описывается двумя парами координат, являющихся диагональю прямоугольника со сторонами, параллельными границам экрана.
Методы DrawArc, DrawPie и FillPie имеют одинаковые параметры. Радиальные линии задают угол (в градусах), который отмеряется по часовой стрелке, начиная от оси X и заканчивая точкой дуги.
Обработчики событий приложения «Графический редактор»
| procedure Form1.Form1_Load(sender: Object; e: EventArgs); begin bm : = new Bitmap(pictureBox1.Width, pictureBox1.Height); pictureBox1.Image := (Image)(bm); gr := Graphics.FromImage(pictureBox1.Image); gr.Clear(Color.White); gr := pictureBox1.CreateGraphics; c_f := Color.Black; p_c := new Pen(c_f, 1); c_b := Color.White; s_b := new SolidBrush(c_b); end; procedure Form1.numericUpDown1_ValueChanged(sender: Object; e: EventArgs); begin p_c.Dispose; w := numericUpDown1.Value; p_c := new Pen(c_f, (integer)(w)); end; procedure Form1.button1_Click(sender: Object; e: EventArgs); begin colorDialog1.ShowDialog(); c_f := colorDialog1.color; w := numericUpDown1.Value; p_c.Dispose; p_c := new Pen(c_f, (integer)(w)); panel1.BackColor := c_f; end; procedure Form1.button2_Click(sender: Object; e: EventArgs); begin colorDialog1.ShowDialog(); c_b := colorDialog1.color; s_b.Dispose; s_b := new SolidBrush(c_b); panel2.BackColor := c_b; end; procedure Form1.pictureBox1_MouseDown(sender: Object; e: MouseEventArgs); begin m_d := true; x1 := e.x; y1 := e.y; end; procedure Form1.pictureBox1_MouseMove(sender: Object; e: MouseEventArgs); begin if m_d then begin gr.DrawLine(p_c, x1, y1, e.X, e.Y); end; x1 := e.X; y1 := e.Y; //запомнить координаты для рисования следующего отрезка end; procedure Form1.pictureBox1_MouseUp(sender: Object; e: MouseEventArgs); begin m_d := false; end; procedure Form1.toolStripMenuItem3_Click(sender: Object; e: EventArgs); begin gr := pictureBox1.CreateGraphics; gr.Clear(c_b); end; procedure Form1.toolStripMenuItem4_Click(sender: Object; e: EventArgs); begin openFileDialog1.ShowDialog(); F_N := openFileDialog1.FileName; Text := ‘myPaint ‘ + F_N; PictureBox1.Load(F_N); end; procedure Form1.toolStripMenuItem5_Click(sender: Object; e: EventArgs); begin saveFileDialog1.ShowDialog(); F_N := saveFileDialog1.FileName; PictureBox1.Image.save(F_N); Text := ‘myPaint ‘ + F_N; end; procedure Form1.numericUpDown1_ValueChanged (sender: Object; e: EventArgs); begin p_c.Dispose; w := numericUpDown1.Value; p_c := new Pen(c_f, (integer)(w)); end; procedure Form1.toolStripMenuItem7_Click(sender: Object; e: EventArgs); begin close; end; |
ПРИЛОЖЕНИЕ К ГЛАВЕ 2
Спецсимволы HTML
| Имя | Вид | Описание |
| | Неразрывный пробел | |
| € | € | Знак евро |
| § | § | Параграф |
| ° | ° | Градус |
| ± | ± | Плюс-минус |
| ¼ | 1/4 | Дробь — одна четвертая |
| ½ | 1/2 | Дробь — одна вторая |
| ¾ | 3/4 | Дробь — три четвертых |
| × | • | Знак умножения |
| < | < | Знак «меньше» |
| > | > | Знак «больше» |
Свойства CSS для управления шрифтами
| Свойство | Значение | Описание | Пример |
| font-family | имя шрифта | Задает список шрифтов | P {font-family: Arial, serif} |
| font-style | normal italic oblique | Нормальный шрифт Курсив
Наклонный шрифт |
P {font-style: italic} |
| font-variant | normal small-caps | Капитель (особые прописные буквы) | P {font-variant: small-caps} |
| font-weight | normal lighter bold bolder 100-900 | Нормальная жирность Светлое начертание Полужирный Жирный 100 — светлый шрифт, 900 — самый жирный |
P {font-weight: bold} |
| font-size | normal pt px | Нормальный размер Пункты Пиксели Проценты |
font-size: normal font-size: 12pt font-size: 12px font-size: 120% |
Свойства CSS для управления видом текста
| Свойство | Значение | Описание | Пример |
| line-height | normal множитель значение в % | Межстрочный интервал | line-height: normal line-height: 1.5 line-height: 12px line-height: 120% |
| text-decoration | none underline overline line-through blink | Убрать все оформление Подчеркивание Линия над текстом Перечеркивание Мигание текста |
text-decoration: none |
| text-transform | none capitalize uppercase lowercase | Убрать все эффекты Начинать С Прописных ВСЕ ПРОПИСНЫЕ все строчные |
text-transform: capitalize |
| text-align | left right center justify | Выравнивание текста | text-align: justify |
| text-indent | значение % | Отступ первой строки | text-indent: 15px; text-indent: 10% |