Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Плещёв ВУМИП 2012-07-06.doc
Скачиваний:
66
Добавлен:
13.05.2015
Размер:
9.35 Mб
Скачать

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;