slacal.kb 的例行程序


AdjustForMonthWithMoreDays

文件名

slacal.kb

语法

AdjustForMonthWithMoreDays(VAL currentDate: DATE, VAL isNext: BOOLEAN)

参数

currentDate - 当前日期

isNext - 如果想转至下一个月,则为 TRUE;如果想转至上一个月,则为 FALSE

返回

调整后的日期

副作用

说明

转至上一个月或下一个月时,必要时调整日期,使得不要略掉某一个月。如果要转至的月份比当前月要少几天,并且当前所选日期大于下一个月的总天数时,则调整日期。

调用的对话框窗体


CalendarColorEvent

文件名

slacal.kb

语法

CalendarColorEvent(REF thisColor: SLAColorRecord)

参数

thisColor - 包含色彩信息的记录结构

返回

1 = 用户接受的对话框 < 1 = 用户取消的对话框

副作用

说明

字体/背景颜色的控件选择,用于窗口中日期的显示。

调用的对话框窗体


CalendarEvent

文件名

slacal.kb

语法

CalendarEvent(REF thisCal: SLACalendarRecord)

参数

selectedDate - 用于日历初始化的日期以及用户选择的日期

返回

1 = 用户选择的日期和接受的窗口< 1 = 用户取消的对话框

副作用

说明

显示日历及处理鼠标事件的事件。

调用的对话框窗体

.dfc[gotodate]

.dfc[calendarfont]

.dfc[formstatus]

.dfc[calendarselectform]

.dfc[calendarcolor]

.dfc[dateinfo]


CalendarFontEvent

文件名

slacal.kb

语法

CalendarFontEvent(REF font: SLAFontRecord)

参数

font - 包含字体信息的记录结构

返回

1 = 用户接受的对话框 < 1 = 用户取消的对话框

副作用

说明

字体的控件选择,用于窗口中日期的显示。

调用的对话框窗体


CalendarFormSelectEvent

文件名

slacal.kb

语法

CalendarFormSelectEvent ( REF formInfo: SLAFormRecord )

参数

formInfo - 带有当前对话框窗体列表的窗体记录结构

返回

副作用

说明

用于日历窗体选择的事件。

调用的对话框窗体

.dfc[' & form & ']


CalendarInfoEvent

文件名

slacal.kb

语法

CalendarInfoEvent(REF parentW: WINDOW)

参数

parentW - 可从中接收信息的父窗口

返回

副作用

说明

用于显示附加日期信息的事件。

调用的对话框窗体


GetCurrentOS

文件名

slacal.kb

语法

GetCurrentOS

参数

返回

操作系统类型。

副作用

说明

返回当前操作系统字符串。

调用的对话框窗体


GotoDateEvent

文件名

slacal.kb

语法

GotoDateEvent(REF gotoDate: DATE)

参数

gotoDate - 用户输入的日期

返回

1 = 用户接受的对话框 < 1 = 用户取消的对话框

副作用

说明

获取要跳转到的日期。

调用的对话框窗体


ImbedSizedCalendar

文件名

slacal.kb

语法

ImbedSizedCalendar ( VAL parentWindow: WINDOW, VAL x: INTEGER, VAL y: INTEGER, VAL width: INTEGER, VAL height: INTEGER, VAL colSpace: INTEGER, VAL rowSpace: INTEGER, VAL fontSize: INTEGER, VAL borders: Boolean,VAL times: ARRAY OF STRING, VAL startDate: DATE, VAL endDate: DATE, REF sDate: DATE, VAL displayTitle: BOOLEAN )

参数

parentWindow - 呼叫者的窗口句柄

x - 要放入日历的 x 坐标位置

y - 要放入日历的 y 坐标位置

width, height - 要使用的宽度和高度,必须特定于此操作系统

colSpace, rowSpace - 列与列、行与行之间的间距也必须特定于此操作系统

fontSize - 字体大小也必须特定于此操作系统

borders - 若为 TRUE,则创建日历的边框

times - 时间间隔为 15 分钟的数组,对应于月的字符串

startDate - SLA 日历范围的第一天

endDate - SLA 日历范围的最后一天

sDate - 开始日期

displayTitle - 若为 TRUE,则显示日历上的标题条;若为 FALSE,则不显示标题条

返回

calW, Window

副作用

将 displayTitle 设置为 TRUE,则允许用户相对于父窗口移动日历。

说明

从呼叫者的窗口调用日历。这样做并不显示任何支持对话框。呼叫者负责与日历通信。

调用的对话框窗体


IsAtLeastASE5

文件名

slacal.kb

语法

IsAtLeastASE5

参数

返回

TRUE - 如果运行 ASE 5.0.0 或更高版本。FALSE - 如果运行 ASE < 5.0.0

副作用

说明

确定是否运行 ASE 的 5.0.0 以上版本。

调用的对话框窗体


ReadCalendarOptions

文件名

slacal.kb

语法

ReadCalendarOptions ( REF calOptions: CalendarOptionsRecord, VAL INIFileName: STRING)

参数

INIFileName - INI 文件,要从中读取

返回

副作用

说明

从 INI 文件中读取所保存的选项。

调用的对话框窗体


SetGlobalCalendarWindowAttributes

文件名

slacal.kb

语法

SetGlobalCalendarWindowAttributes

参数

返回

副作用

说明

如果尚未设置,则设置全局操作系统从属窗口属性。

调用的对话框窗体


WriteCalendarOptions

文件名

slacal.kb

语法

WriteCalendarOptions ( VAL calOptions: CalendarOptionsRecord, VAL INIFileName: STRING)

参数

返回

副作用

说明

将当前选项写入 INI 文件。

调用的对话框窗体