Интерактивное графическое программное обеспечение PC-DMIS (Глава 11: Создание отчетов HyperView), страница 10

Объект TextVar

Функция TextVarпозволяет вам включать в отчет динамичный текст. Этот объект отличается от объекта Text отсутствием свойства TEXT и наличием двух дополнительных свойств:

Вы можете использовать объект  TextVarдля отображения номеров страницмногостраничных отчетов HyperView. Просто настройте свойство ValueEq, чтобы оно отображало переменную CurPage (номер текущей страницы) или NumPage (общее число страниц).

Образец использования сценария BASIC для динамичного отображения текста.

Вы можете пользоваться кодами BASIC VBSMini-Editorдля динамичного отображения значений объекта TextVar. Например, если вы хотите отображать текст заголовка только на определенных страницах многостраничного отчета, вы можете воспользоваться следующим кодом:

1.  Создайте десятистраничный отчет так, как описано в главе "Создание многостраничных отчетов" на странице 11-65.

2.  Дважды щёлкните объект TextVarдля открытия диалога PropertySheet.

3.  Откройте вкладку PC-DMIS.

4.  Щёлкните свойство ValueEQ. Появляется VBSMini-Editor, но лишь некоторые его части можно выделить.

5.  Выберите из списка VBScript. Теперь возможен ввод информации.

6.  Добавьте несколько переменных, значение которых вы хотите отобразить на разных страницах:

Dim strMessage1 As String

Dim strMessage2 As String

strMessage1 = "HEADING FOR PAGES 1-5"

strMessage2 = "HEADING FOR PAGES 6-10"

7.  Добавьте условный код в зависимости от номера страницы, текст на которой вы хотите изменить с помощью инструмента  TextVar.

If curpage <= 5 Then Retn = strMessage1 Else Retn = strMessage2

Этот код изменяет текст, чтобы отображать полосу, заданную командой strMessage1, с первой страницы по пятую, а потом отображать полосу, заданную командой strMessage2 с шестой до десятой страницы.

8.  Щёлкните OK для закрытия VBSMini-Editor.

9.  Закройте диалог PropertySheet.

10.  Запустите режим выполнения нажатием CTRL + E.

11.  Нажимайте PAGEUP или PAGEDOWN для перехода со страницы на страницу и наблюдайте динамические изменения текста.

Объект Line (Линия)

Объект  Lineпозволяетсоздавать прямую линию в отчете HyperView. Потом вы можете изменять ее свойства щелчком правой кнопки мыши по созданной линии.

Для линии предусмотрены следующие свойства:

Объект Polyline (Ломаная линия)

Объект Polyline позволяет вам создавать многоугольники и ломаные линии, соединяя линии вместе. Когда вы уже создали первую линию, вторая автоматически начнется с конца первой.  Объект Polyline имеет те же свойства, что и объект Линия, а также несколько особых свойств: