变电站实时监控系统模型程序

《变电站实时监控系统模型程序》由会员分享，可在线阅读，更多相关《变电站实时监控系统模型程序（10页珍藏版）》请在金锄头文库上搜索。

1、（6）YXDEF.DBF 遥 信 测 点 的 定 义 库用 于 存 放 遥 信 测 点 信 息 定 义 记 录 ， 其 结 构 如 下 ：字 段 名 含 义 属 性 长 度DH 点 号 整 型 2Name 设 备 名 称 字 符 20JDZT 输 入 接 点 状 态 逻 辑 型 1JDON 接 点 ”通 ”时 显 示 字 符 10JDOFF 接 点 ”断 ”时 显 示 字 符 10CD 是 否 存 档 逻 辑 型 1State 开 关 状 态 逻 辑 型 1JSDEF.DBF 计 算 数 据 库用 于 存 放 计 算 信 息 定 义 记 录 ， 其 结 构 如 下 ：字 段 名 含 义 属 性

2、 长 度DH 点 号 整 型 2Symb 计 算 符 号 （ +-*/=） 字 符 1DLFDSJ.DBF 电 量 峰 谷 时 间 分 段 信 息用 于 存 放 电 量 时 段 信 息 定 义 记 录 ， 其 结 构 如 下 ：字 段 名 含 义 属 性 长 度DH 序 号 整 型 2时 段 标 记 时 段 数 （ 0/1/2） 字 符 1注 ： 0： 高 峰 时 段1： 低 谷 时 段2： 腰 荷 时 段YCBBX.DBF 遥 测 报 表 定 义 库用 于 存 放 遥 测 报 表 格 式 定 义 记 录 ， 其 结 构 如 下 ：字 段 名 含 义 属 性 长 度SJ 序 号 整 型 2D0

3、1 报 表 第 一 项 字 符 8.D18 报 表 最 后 一 项 字 符 8DLBBX.DBF 遥 测 报 表 定 义 库用 于 存 放 电 量 报 表 格 式 定 义 记 录 ， 其 结 构 如 下 ：字 段 名 含 义 属 性 长 度SJ 序 号 整 型 2D01 报 表 第 一 项 字 符 10.D16 报 表 最 后 一 项 字 符 10图 形 库ZJXT.GR 主 接 线 图 文 件YCSJB.GR 遥 测 列 表 文 件YXSJB.GR 遥 信 列 表 文 件DLSJB.GR 电 量 列 表 文 件用 于 存 放 图 形 文 件 定 义 记 录 ， 其 数 据 结 构 如 下 ：

4、struct int Parts; Attribute;union struct int x1,y1,x2,y2;int Width;TColor Color; Line;struct int x,y;TColor Color;int Size;char Name20;char CodeSTRLENTH+1; String;struct int x,y;int Point,State;TColor Color; S00;struct int x,y;int Point,State;TColor Color; S01;struct int x,y;int Point,State;TColor C

5、olor; S02;struct int x,y;int Point,State;TColor Color; Data; Attr; ElementRECORDLEN; 变电站实时监控系统模型（9） 六 、 系 统 设 计 本 项 设 计 中 ， 本 人 负 责 主 控 模 块 、 画 面 显 示 模 块 、 异 常 显 示 模 块 、 信 息 定 义 模 块 、 作 图 模 块 、 计 算 模 块 、 电 量 积 分 等 模 块的 编 制 。1、 主 控 模 块完 成 系 统 主 画 面 的 生 成 、 时 间 单 元 初 始 化 、 用 户 数 据 库 读 入 、 实 时 数 据 库 的

6、打 开 、 图 形 类 的 申 请 、 串 行 通 信 口 启 动 等 工 作 。其 代 码 如 下 ：_fastcall TFrmMain:TFrmMain(TComponent* Owner): TForm(Owner)time_t t;struct tm *mt;FILE *Stream;MonDays0=31,MonDays1=28,MonDays2=31；MonDays3=30，MonDays4=31,MonDays5=30；MonDays6=31,MonDays7=31，MonDays8=30；MonDays9=31,MonDays10=30,MonDays11=31;t=time

7、(NULL);mt=localtime(Year=mt-tm_year+1900；Month=mt-tm_mon+1；Day=mt-tm_mday;Hour=mt-tm_hour；Minute=mt-tm_min；Second=mt-tm_sec;delete mt;TableYCDef-IndexName=IdxDH;TableYXDef-IndexName=IdxDH;TableDLDef-IndexName=IdxDH;CommSwitch=-1;XTYXGr=new TMyGr;XTYXCls=new TClsDraw;XTYXGr-Image=Image1;XTYXCls-Image

8、=Image1;Stream=fopen(c:bysjlibbch.dat,rb);fread(BchTbl,sizeof(BchTbl),1,Stream);fclose(Stream);SynFlag=false;Comm1-StartComm();2、 画 面 显 示 模 块完 成 画 面 图 形 读 入 、 显 示 、 任 务 设 定 。 其 代 码 片 段 如 下 ：void _fastcall TFrmMain:menu_ZJXTClick(TObject *Sender)CommSwitch=dtZJXT;XTYXGr-Image-Canvas-Pen-Color=clWhite

9、;XTYXGr-Pointer=XTYXGr-Read_GrFile(c:bysjlibjxt.gr);if (XTYXGr-Pointer!=0) XTYXCls-ClearDraw();XTYXGr-DisplayGr(); 3、 异 常 记 录 显 示 模 块将 异 常 记 录 数 据 库 与 一 显 示 表 格 对 应 起 来 ， 显 示 变 位 记 录 内 容 。 开 关 变 位 模 块 代 码 如 下 ：void _fastcall TFrmMain:menu_KGBWClick(TObject *Sender)CommSwitch=dtKGBWJL;FrmXSBWJL-Show(

10、);4、 信 息 定 义 模 块定 义 遥 测 测 点 、 遥 信 测 点 、 电 量 测 点 的 有 关 参 数 。 其 中 遥 测 定 义 子 程 序 代 码 如 下 ：void _fastcall TFrmjk:JYCDYKClick(TObject *Sender)Table1-Close();Table1-DatabaseName =c:bysjlib;/定义数据库路径Table1-TableName =ycdef;/定义数据库路文件名Table1-TableType =ttDBase;/定义数据库类型Table1-FieldDefs-Clear();/清除原数据字段Table1-F

11、ieldDefs-Add(DH,ftWord,0,true);Table1-FieldDefs-Add(Name,ftString,20,false);Table1-FieldDefs-Add(XS,ftFloat,0,false);Table1-FieldDefs-Add(BD,ftFloat,0,false);Table1-FieldDefs-Add(Uplimt,ftFloat,0,false);Table1-FieldDefs-Add(Downlimt,ftFloat,0,false);Table1-FieldDefs-Add(JFD,ftInteger,0,false);Table1

12、-FieldDefs-Add(Data,ftFloat,0,false);/定义各字段Table1-IndexDefs-Clear();/清除索引TIndexOptions MyIndexOptions;MyIndexOptionsIndexDefs-Add(IdxDH,DH,MyIndexOptions); /创建索引，索引名为 IdxDH/MyIndexOptionsixUnique;/取消唯一索引选项/Table1-IndexDefs-Add(IdxLB,LB,MyIndexOptions);Table1-CreateTable();/创建数据库/Table1-Active=true;T

13、able1-Open();/提示字段改为中文Table1-FieldByName(DH)-DisplayLabel=点号;Table1-FieldByName(Name)-DisplayLabel=名称;Table1-FieldByName(XS)-DisplayLabel=系数;Table1-FieldByName(BD)-DisplayLabel=满度值;Table1-FieldByName(UpLimt)-DisplayLabel=上限;Table1-FieldByName(DownLimt)-DisplayLabel=下限;Table1-FieldByName(JFD)-Display

14、Label=积分点;Table1-FieldByName(Data)-DisplayLabel=数据;变电站实时监控系统模型（10）5、 作 图 模 块其 基 本 思 想 是 定 义 一 个 标 绘 图 形 库 ， 记 录 图 形 的 基 本 特 征 ， 以 便 于 显 示 、 编 辑 和 检 索 。 图 形 类 定 义 代 码 如 下 ：class TMyGrpublic:WORD Read_GrFile(char *Name);void Write_GrFile(char *Name);void DisplayGr();void dispS00(int x,int y);void dispS01(int x,int y,int flag);void dispS02(int x,int y,int flag);TImage *Image;WORD Pointer;struct ELEMENT struct int Parts; Attribute;union struct int x1,y1,x2,y2;int Width;Tcolor Color; Line;struct int x,y;Tcolor Color;Int Size;Char Name20;Char CodeSTRLENTH