- 1、本文档共22页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
【C程序】样板抄表程序源码
/*****************************************************\
**
** 抄表机应用程序例程源代码(仅供参考)
**
** ModuleName:样板抄表程序.c
**
\*****************************************************/
#include A198.h
#include header.h //调用头文件header.h
//主函数
void __main__(void)
{
U8 MenuChoice;
const P_U8 MainMenu[]={//菜单显示格式
[1]续上次抄,
[2]抄漏抄表,
[3]按顺序抄,
[4]查询抄表,
[5]抄表统计,
};
U8 szKeyChoice[]={12345 };
szKeyChoice[5]=QUERY;
strcpy(dbfname,ZoLandb.dbf);
use(); //关闭数据库
if(use(dbfname)!=OK)//打开数据库,与use()一起调用,如果不等于ok,即1,则显示错误如下
{
cls();
moveto(1,1); putstr(错误:);
moveto(1,3); putstr(类型:数据库打开错误);
moveto(1,5); putstr(原因:1,数据库未下装);
moveto(1,7); putstr( 2,数据库名不正确);
moveto(1,15);putstr(按任意键退出);
key(0);
return;
}
if(reccount0||reccount==0)//如果数据库记录数为0或小于0,数据库是空库,显示以下错误并返回
{
cls();
moveto(1,1); putstr(错误:);
moveto(1,5); putstr(原因:数据库为空库);
moveto(1,15);putstr(按任意键退出);
key(0);
return;
}
while(1)
{
cls();
moveto(14,15);
putstr( );
moveto(1,1);
putstr( 某某电力公司);
Show_Date();
drawrect(15,16,110,110);
MenuChoice=popup(3,4,15,13,MainMenu,szKeyChoice,5,5,0);//显示菜单函数
//MenuChoice=cpopup(MainMenu,szKeyChoice,5,5,0);//显示菜单函数
switch(MenuChoice)
{
case 0:
Input_Record(Continue_MSG);break;//续上次抄表
case 1:
您可能关注的文档
- TICTACTOE游戏.doc
- Techlog软件WBI培训.docx
- TCR+FC型SVC静止动态无功补偿装置简介.doc
- TI_msp430_g2553定时器A.doc
- THDF车间设备型号配件表.doc
- TL431补偿电容.doc
- TK28-ZBB变压器保护测控装置说明书.doc
- TM016地震式振动变送器.doc
- TNIS过套管成像系统简介.doc
- TJI4轮驱动混合动力介绍.doc
- 人教版英语5年级下册全册教学课件.pptx
- 部编人教版2年级上册语文全册教学课件含单元及专项复习.pptx
- 人教版8年级上册英语全册教学课件(2021年8月修订).pptx
- 教科版(2017版)6年级上册科学全册课件+课时练.pptx
- 人教版PEP版6年级英语下册全册教学课件(2022年12月修订).pptx
- 部编人教版2年级下册语文全册课件(2021年春修订).pptx
- 人教版数学6年级下册全册教学课件(2023年教材).pptx
- 湘少版5年级下册英语全册教学课件(2021年春修订).pptx
- 人教PEP4年级下册英语全册教学课件 [2}.pptx
- 人教版6年级上册英语全册教学课件.pptx
最近下载
- 《人生由我》梅耶·马斯克 ppt读书笔记模板.pptx
- 2025届高考专题复习:古诗词鉴赏 课件(共136张PPT).pptx VIP
- (二模)2024~2025 学年度苏锡常镇四市高三教学情况调研(二) 地理试卷(含答案).docx
- Recycle Mike's happy days-Mike's day on the farm(课件)人教PEP版英语六年级下册.pptx
- 2025年《普通高中语文课程标准 .pdf VIP
- 2025届高考语文专题复习:古诗词鉴赏二轮复习策略 课件(共61张PPT).pptx VIP
- 七下语文同步解析与测评人教版电子版.pdf VIP
- 供水设备供货及安装施工方案.docx VIP
- 绿色设计产品评价规范 建筑结构用钢板.pdf VIP
- 高中语文(统编版)必修上册全册单元教材解读课件.pptx
文档评论(0)