





数据类型：

只对

I/O

类型的变量起作用，

定

义变量对应的寄存器的数据类型，共有

9

种数

据类型供用户使用，这

9

种数据类型分别是：

BIT

：

1

位；范围是：

0

或

1

BYTE

：

8

位，

1

个字节；范围是：

0---255

SHORT

，

2

个字节；范围是：

-32768---32767

USHORT

：

16

位，

2

个字节；

范围是：

0---65535

BCD

：

16

位，

2

个字节；范围是：

0---9999

LONG

：

32

位

，

4

个

字

节

；

范

围

是

：

-2147483648

——

2147483647

LONGBCD

：

32

位

，

4

个

字

节

；

范

围

是

：

0---4294967295

FLOAT

：

32

位

，

4

个

字

节

；

范

围

是

：

10e-38---10e38

，有效位

7

位

STRING

：

128

个字符长度

常用组态函数

存报表

string filename;

filename="F:

实时数据文件夹

\"+strfromreal(\\

本站点

\$

年

,0,"f")+

strfromreal(\\

本站点

\$

月

,0,"f")

+strfromreal(\\

本站点

\$

日

,0,"f")+".xls";

reportsaveas("

实时报表

",filename);

显示年月日时分

string filename;

filename="F:

实时数据文件夹

\"+strfromreal(\\

本站点

\$

年

,0,"f")+"

年

"+

strfromreal(\\

本站点

\$

月

,0,"f")+"

月

"

+strfromreal(\\

本站点

\$

日

,0,"f")+"

日

"+strfromreal(\\

本站点

\$

时

,0,"f")+"

时

"+strfromreal(\\

本站点

\$

分

,0,"f")+"

分

"+".xls";

reportsaveas("22",filename);

菜单函数

if(MenuIndex==0)

{ShowPicture("

历史曲线

");}

if(MenuIndex==1)

{ShowPicture("

实时曲线

");}

if(MenuIndex==2)

{ShowPicture("

实时曲线

1");}

if(MenuIndex==3)

{ShowPicture("

实时曲线

2");}

if(MenuIndex==4)

{ShowPicture("

实时曲线

3");}

if(MenuIndex==5)

{ShowPicture("

报警系统

");}

if(MenuIndex==6)

{ShowPicture("

实时曲线

4");}

if(MenuIndex==7)

{ShowPicture("

实时报表

");}

if(MenuIndex==8)

{ShowPicture("

实时报表

1");}

关闭画面

closePicture("

主界面

");

报表查询

string whe;

whe="

报警日期

>='"+\\

本

站点

\

选择日期

+"'

and

报警日期

<='"+\\

本站点

\

选择日期

2+"'";

KV

.Where=whe;

KV

.FetchData();

KV

.FetchEnd();

实时报表

if(\\

本站点

\row<=30)

{

ReportSetCellString2("Report4",

row,

1,row,26," ");

ReportSetCellString("Report4",

row,

1,\\

本站点

\$

时间

);

ReportSetCellValue("Report4", row, 2,\\

本站点

\

粗格栅

1#

液位

);

ReportSetCellValue("Report4", row, 3, \\

本站点

\

粗格栅

2#

液位

);

ReportSetCellValue("Report4", row, 4, \\

本站点

\

硫化氢浓度

);

ReportSetCellValue("Report4", row, 5,\\

本站点

\

进口

COD

显示

);

ReportSetCellValue("Report4", row, 6, \\

本站点

\

进口氨氮显示

);

ReportSetCellValue("Report4", row, 7, \\

本站点

\

悬浮物

);

ReportSetCellValue("Report4", row, 8, \\

本站点

\

进水

PH);

ReportSetCellValue("Report4", row, 9,\\

本站点

\