Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Высокоуровневые методы информатики и программир...docx
Скачиваний:
25
Добавлен:
12.11.2019
Размер:
6.53 Mб
Скачать

2 .3.6.4. Редактируемое поле со счетчиком (SpinEdit)

С четчик (панель Samples) аналогичен счетчику UpDown, но имеет собственное поле ввода, в кото­ром отображается текущее значение счетчика (свойство Value), и пользователь может изменить значение этого поля сам непосредственно или щелчками мыши по стрелочкам кнопки.

2.3.6.5. Индикаторы процесса выполнения программы (ProgressBar, Gauge)

И ндикатор ProgressBar (панель Win32) используется для визуального отображения в виде линии хода выполнения длительного по времени вычислительного процесса.

Специфичные свойства

Smooth=True задает сплошную линию, иначе ‑ сегментированная линия.

Step ‑ шаг приращения свойства Position методом StepIt.

Методы: StepBy(h), StepIt ‑ наращивание свойства Position на величины h и свойства Step соответственно.

Индикатор Gauge (панель Samples) дополнительно определяет цвет и выводит процент заполнения в графической форме (п.2.3.7.6).

2.3.7. Графика

2.3.7.1. Изображение (Image)

К омпонент (панель Additional) предназначен для размещения растровой картинки (BMP), пиктограм­мы (ICO) или метафайла (WMF, EMF).

Специфичные свойства

AutoSize ‑ размер рисунка определяет размер компонента (True).

Canvas ‑ описание свойств канвы растровой картинки для ее изменения.

Center ‑ расположение картинки по центру компонента.

IncrementalDisplay ‑ показ большого изображения при загрузке (True).

Picture ‑ имя файла с изображением.

Stretch ‑ изображение полностью заполняет компонент (True).

2.3.7.2. Список изображений (ImageList)

К омпонент (панель Win32) является контейнером для хранения списка рисунков одинакового размера с индексированным способом доступа. Для заполнения списка используется команда ImageList Editor из контекстного меню. Списки часто используются в качестве источника для выбора картинок, отображаемых на различных объектах (например, на кнопках) используя свойства ImageIndex.

Специфичные методы

CreateSize(AWidth,AHeight) ‑ задает новый размер рисунка.

Add (AddMasked), AddIcon ‑ добавляют в конец списка битовый образ (маска формируется автоматически) и пиктограмму соответственно.

AddImages ‑ добавляет в конец списка все картинки из другого списка.

Insert(InsertMasked),InsertIcon ‑ включают образ по номеру.

Replace(Replace Masked), ReplaceIcon ‑ заменяют образ по номеру.

Clear/Delete ‑ удаляет все/по номеру образ из списка.

Draw ‑ выводит образ по его номеру на холст.

2.3.7.3. Геометрическая фигура (Shape)

И зображение геометрической фигуры, задаваемой свойством Shape: stRectangle (прямоугольник), stSquare (квадрат), stRoundRect (скругленный пря­моугольник), stRoundSquare (скругленный квадрат), stEllipse (эллипс), stCircle (окружность).

2.3.7.4. Фаска (Bevel)

Ф аска (панель Additional) представляет собой прямоугольник, рамку или линию и служит для визуального выделения группы объектов.

Специфичные свойства

Shape ‑ фигура фаски: bsBox (прямоугольник), bsFrame (рамка), bsEpace (невидимый прямоугольник), bsTop, bsBottom, bsLeftLine, bsRightLine (линия сверху, снизу, слева, справа соответственно).

Style ‑ стиль оформления фаски: bsLowerd (вогнутая), bsRaised (выпуклая).

2 .3.7.5. Окно рисования (PaintBox)

К омпонент (панель System) задает прямоугольную об­ласть для рисования в случае, когда область для ри­со­вания следует ограничить или рисуемые ком­по­нен­ты не имеют свойство Canvas. Основное свойство ‑ Canvas (п.2.2.8.4).

В обработчике события OnPaint идет рисование.

Пример рисования эллипса в заставке этого пункта:

Procedure TForm1.PaintBox1Paint(Sender: TObject); Var x,y: Integer;

Begin With PaintBox1, Canvas Do Begin //присоединение имен объектов

Brush.Color:=clGreen; Ellipse(0,0,Width,Height); Font.Name:='New Times'; Font.Size:=Height Div 4; Font.Style:=[fsItalic, fsBold]; Font.Color:=clWhite;

x:=(Width‑TextWidth('Эллипс')) Div 2; y:=(Height‑TextHeight('Э')) Div 2;

TextOut(x,y,'Эллипс'); End; End;