下载文档原格式
程序的作用是
程序的作用是为实现预期目的而进行操作的一系列语句和指令，一般分为系统程序和应用程序两大类，计算机中的程序在港澳台地区称为程式。
程序就是为使电子计算机执行一个或多个操作，或执行某一任务，按序设计的计算机指令的集合。
程序，香港和台湾对英文procedure的中文翻译，编程语言中的procedure在大陆翻译为“过程”，在港台和其他领域则翻译为“程序”。
在大陆于计算机科学、电脑工程、电子工程、电机工程、机器人工程学、机械工程领域中的英文术语program的中文译名也是“程序”，在港台则翻译为“程式”。
当程序为procedure的译名时，一个程序即是特定的一系列动作、行动或操作，而这些活动、动作或操作必须被执行于相同方式以为了在相同环境下恒常得出相同的结果（例如紧急应变程序）。
第2章习题1试说明进程和程序之间的区别和联系。
解进程和程序是既有区别又有联系的两个概念。
(1)进程是动态的，程序是静态的。
程序是一组有序的指令集合，是一个静态的概念；进程则是程序及其数据在计算机上的一次执行，是一个动态的集合。
离开了程序，进程就失去了存在的意义，但同一程序在计算机上的每次运行将构成不同的进程。
程序可看作是电影的胶片，进程可以看作电影院放电影的过程。
(2)一个进程可以执行多个程序，如同一个电影院的一场电影可放映多部影片。
(3)一个程序可被多个进程执行，如同多个影院同时利用一个电影的胶片放映同一部电影。
(4)程序可以长期保存，进程只能存在于一段时间。
程序是永久存在的，而进程有从被创建到消亡的生命周期。
举例说明多道程序系统失去了封闭性和再现性。
解例如，有两个循环程序A和B，共享一个变量N。
程序A每执行一次时，都要做N：=N+1操作；程序B则每执行一次时，都要执行print(N)操作，然后再将N的值置成“0”。
程序A和B在多道程序系统中同时运行。
假定某时刻变量N的值为n，可能出现下述三种情况：(1)N：=N+1 在print(N)和N：=0之前，此时得到N值变化过程为n+1、n+1、0；(2)N：=N+1 在print(N)和N：=0之后，此时得到N值变化过程为n 、0 、1；(3)N：=N+1 在print(N)之后和N：=0之前，此时得到N值变化过程为n、n+1、0。
所以，在A、B程序多次执行过程中，虽然其每次执行时的环境和初始条件都相同，但每次得到的结果却不一定相同。
两个并发进程P1和P2的程序代码在下面给出。
其中，A、B、C、D和E均为原语。
P1: begin P2: beginA; D;B; E;C; endend请给出P1、P2两个进程的所有可能执行的过程。
解P1和P2进程以不可预知的速度推进，它们所有可能的执行过程为：(1)A→B→C→D→E (2)A→B→D→E→C(3)A→B→D→C→E (4)A→D→B→E→C(5)A→D→B→C→E (6)A→D→E→B→C(7)D→E→A→B→C (8)D→A→B→C→E(9)D→A→B→E→C (10)D→A→E→B→C在操作系统中为什么要引入进程这一概念？解在单道程序设计环境下，CPU被一道程序独占，CPU严格按该程序的指令顺序来执行。
怎样编写程序程序是计算机按照一定的算法和逻辑运行的指令集合。
编写程序是将问题转化为计算机能够理解和执行的指令的过程。
本文将介绍编写程序的基本步骤和一些常用的编写程序的技巧。
步骤一：理解需求在编写程序之前，首先需要明确程序的需求和目标。
了解用户的需求可以帮助我们选择合适的编程语言和设计程序的结构。
当我们清楚了解了需求之后，才可以开始着手编写程序。
步骤二：选择编程语言根据需求和个人的编程经验，选择一种或多种适合的编程语言。
编程语言有很多种，如Python、Java、C++等，它们各有特点和适用范围。
选择编程语言时，需要考虑语言的易用性、效率、可扩展性等因素。
步骤三：编写算法算法是程序的核心。
编写算法可以理清问题的逻辑思路，确定程序的输入、处理和输出。
在设计算法时，可以使用流程图、伪代码等方式进行描述，以便于更好地理解和实现。
良好的算法设计可以提高程序的效率和可读性。
步骤四：编写代码在编写程序代码时，可以根据选定的编程语言的语法规范进行编码。
代码应该清晰、易读、易维护，可以添加注释来解释代码的逻辑和功能，方便其他人理解代码。
编写代码需要注意规范和命名规则，合理选择变量名、函数名等，以便于后续阅读和修改。
步骤五：测试和调试编写完代码后，需要进行测试和调试来确保程序的正确性和稳定性。
测试可以分为单元测试、集成测试和系统测试等。
在测试过程中，可以利用测试框架和工具来自动化测试，以减少人工测试的工作量，提高测试的效率。
如果发现了错误或异常，需要进行调试来找出问题所在并修复。
步骤六：文档编写在程序编写完成后，还需要编写文档来记录程序的使用方法、功能和实现细节等。
文档应该包括程序的概述、输入输出说明、运行环境要求、使用示例和常见问题等。
编写好文档可以方便其他人了解和使用程序，减少沟通成本。
文档可以使用Markdown格式进行编写，方便阅读和发布。
步骤七：优化和维护编写好程序之后，可以进行优化来提高程序的性能和效率。
程序用英语怎么说任何单位任何事情，首先强调的就是程序，因为管理界有句名言：细节决定成败。
程序就是整治细节最好的工具。
于是，现在我们的所有工作，无时无处不在强调程序。
那么你知道程序用英语怎么说吗?下面来学习一下吧。
程序英语说法1：procedure程序英语说法2：program程序的英语例句：第二天我重复了这个程序。
The next day I repeated the procedure.每个人都希望法庭程序能够简化。
Everyone favours the simplification of court procedures.它那套被大肆吹嘘的安保程序并没有发挥作用。
Its vaunted security procedures hadn't worked.对程序进行修改是徒劳无功的。
Revising the procedure was an entirely profitless exercise.这套程序是经理人员制订计划的可贵的工具。
This program gives managers a valuable planning tool.计算机程序设计人员的一般工资是多少?What's the going rate of computer programmers?这一程序是法律批准的。
The law warrants this procedure.罗楫程序设计语言用编写模仿人类思维的程序的程序语言A programming language used for writing programs that model human thinking.给每个应用程序指派了一个代理程序以代表该应用程序进行工作。
Each application is assigned an agent that works on behalf of the application.罗楫程序设计语言用编写模仿人类思维的程序的程序语言。
程序名词解释程序是指一系列按照特定顺序执行的计算机指令的集合。
简单来说，程序就是告诉计算机需要执行哪些操作以达到特定的目标。
程序由程序代码组成，可以使用不同的编程语言来编写。
编程语言是一种人和计算机都能理解的语言，它用于编写程序代码，包括算法、逻辑和计算步骤。
程序执行的过程一般分为以下几个步骤：首先，将程序代码编译或解释成计算机能够理解的机器代码；然后，计算机按照指令的顺序执行这些机器代码，逐步运算并修改数据；最后，计算机输出最终的结果或者更新相关资源。
程序可以用于各种用途，如计算、数据处理、图形处理、网络通信、媒体播放等。
程序可以很简单，只包含几行代码，也可以非常复杂，拥有上百万行代码。
程序还可以分为系统程序和应用程序。
系统程序是用于管理计算机硬件和软件资源的程序，如操作系统和驱动程序等。
应用程序是用户根据自己的需求编写的程序，如文字处理程序、电子表格程序、游戏程序等。
程序还可以按照运行方式来划分，可以分为批处理程序和交互式程序。
批处理程序是无需用户干预，自动按照预定的顺序执行的程序。
交互式程序是需要用户输入指令和数据，计算机根据用户的输入进行相应的操作和响应。
程序还可以分为单线程程序和多线程程序。
单线程程序是指只能按照顺序执行指令的程序，一次只能执行一个任务。
多线程程序是指程序可以同时执行多个任务，每个任务都是一个独立的线程，可以并行执行。
程序的设计和编写遵循一定的开发流程和规范。
一般来说，程序的设计包括需求分析、算法设计和系统设计等阶段。
然后，根据设计的结果编写程序代码。
在编写代码的过程中，需要考虑代码的可读性、可维护性和性能等方面的要求。
编写完成后，需要进行代码测试和调试，以确保程序能够正常运行并达到预期的效果。
总之，程序是一系列指令的集合，用于告诉计算机如何进行处理和计算。
程序的编写需要使用编程语言，遵循一定的开发流程和规范。
通过程序的执行，计算机可以完成各种任务和操作。
程序是什么意思
程序就是事物发展的一个步骤，可以这样理解：大雁要过冬了。
它们在准备飞往南方时，都会有一段休息期，用来调整体温、新陈代谢等。
这段时间里面，大雁之间相互依靠着取暖，慢慢地形成了共同的行为习惯和规律，从而使得大雁能够顺利地度过漫长的冬天，到达南方。
程序就是事物发展的一个步骤，而且这个步骤还很重要！
当然不排除他人乱写程序，或者故意打破这种秩序；但也存在某些“程序”是确定无疑的，不管怎么变化总保持原样。
比如太阳、月亮、星球、恒星系……它们周围永远都是白色光芒照耀着，永远处于静止状态。
在银河系中间的太空上是一片漆黑。
银河系外又分布着许多巨大的气体云团，其实那只是数不清的尘埃、冰粒、彗核等，所组合成的微观宇宙。
即使把它想象成超级大盘子，放入了十几亿个星系，看起来像是银河系被吃掉了似的。
在更遥远的深空，正有几千万个黑洞转动着身躯，连接成无穷无尽的通道，似乎并没有什么东西能逃出去。
我不知道上述情况真假，毕竟是假设，难免会出现与客观实际不符合的地方。
但是从最简单的层次考虑问题，上述推论应该是正确的吧？因此说，世界本来就是这个样子的，“自己按下快门就会拍摄到自己的影子”这句话倒是很对的。
不过要做到一点，前提条件是你首先必须让自己的头脑具备足够丰富的知识储备量。
否则，就算你找好角度并且坚持拍摄几百张图片，恐怕最后的结果是你不仅啥也记录不住，甚至连记忆里存在哪儿都忘却了，跟废纸没区别。
所以才需要复杂繁琐的操作流程。
人类制造各式各样的机器来辅助工作，比如收割
机、挖掘机、建筑机械、运输车辆、电梯等等，目的是为了提高效率，节省劳力。
程序的概念指令的概念组成程序的概念：程序是一系列按照特定顺序安排的指令集合，旨在实现特定的计算或操作。
它是计算机控制人们所要求的任务执行的途径，是将人的思维逻辑通过指令转化为计算机可理解和执行的形式。
指令的概念：指令是程序中的基本单元，是计算机程序执行的最小命令单位。
它用来定义计算机的操作，指导计算机进行特定的运算、判断或控制。
指令可以分为不同类型，如算术指令、逻辑指令、数据传输指令、程序控制指令等。
每个指令一般包含操作码和操作数，操作码指明所要进行的操作，操作数则是操作所需要的数据。
程序的组成：程序的组成主要包括算法、语法和语义三个方面。
1. 算法：算法是程序的核心，是解决特定问题的步骤和方法的描述。
它描述了程序的逻辑流程和操作步骤，包括输入、处理和输出过程。
良好的算法可以提高程序的效率和可靠性。
2. 语法：语法是程序编写中的规则和约束，它定义了程序中各种基本结构和语句的组织方式。
程序必须按照语法规则编写，才能被计算机准确理解和执行。
常见的语法元素包括关键字、操作符、标识符、常量、变量和注释等。
3. 语义：语义是程序中各种语句和表达式的意义和含义。
它描述了语句和表达式所要完成的功能和操作，包括数据类型、变量声明、运算规则、控制流程等。
语义保证了程序的正确性和可靠性。
程序的概念、指令的概念和程序的组成是紧密相关的。
程序通过指令来实现特定的计算和操作，指令又是程序的基本单元。
程序的组成由算法、语法和语义三个方面共同构成。
程序的概念和指令的概念都是计算机科学的基础概念，对于理解和掌握程序设计和计算机原理非常重要。
程序的正确编写和运行需要准确理解和使用指令，同时注意程序的算法、语法和语义，以确保程序的正确性和可靠性。
通过深入研究和应用程序的概念和指令的概念，可以进一步提高程序的效率和质量，为实现各种复杂的计算和操作提供支持。
什么是进程，进程与程序的主要区别是什么？
进程是指⼀个具有⼀定独⽴功能的程序关于某个数据集合的⼀次运⾏活动。
进程与程序的区别：
1、程序是指令的有序集合，是⼀个静态概念，其本事没有任何运⾏的含义。
⽽进程是程序在处理机上的⼀次执⾏过程，是⼀动态的概念。
2、程序可以作为⼀种软件资料长期保存，⽽进程则是有⼀定⽣命周期的，它能够动态的产⽣和消亡。
3、进程是⼀个能独⽴运⾏的单位，能与其他进程并⾏活动。
4、进程是竞争计算机系统有限资源的基本单位，也是进⾏处理机调度的基本单位。
程序⽆此该概念。
5、进程与程序之间⽆⼀⼀对应关系。
不同的进程可以包含同⼀程序，同⼀程序在执⾏中也可以产⽣多个进程。
6、程序是记录在介质上指令的有序集合，⽽进程则由程序、数据和进程控制块3部分组成。
餐饮服务流程及基本服务流程服务基本常识一.一切服务从主人位开始后主宾，然后顺时针方向进行。
二．在进行一切服务时应先告知客人，以示尊重。
三．服务过程中应随时使用礼貌用语。
1．迎客、问好：您好，欢迎光临。
里边请。
1.进入房间后服务员需要先递上毛巾供客人擦手或擦脸用。
2.询问客人就餐人数根据用餐人数调整餐位。
（如客人直接入座需要询问茶水等）加减位服务程序：1、客人入坐时，先询问用餐人数。
2、根据客人人数，添撤餐椅，如为加位，则先添加餐椅（以免客人无座站立尴尬的现象）3、移放餐台现有餐具，给所加餐具留出位置。
4、从备餐间拿取相应数量的餐具。
5、将餐具按人数加入，并摆放到餐台上。
6、将所加餐椅摆放到相应的餐位上。
要求：餐具间距相等，突出主人位！语言：“您好，您几位用餐”“请您稍等，我给您加下餐位”“对不起，麻烦您让一下，我给您加餐具，谢谢。
”（如果此时客人正围坐在餐位上）“不好意思，让您久等了，请您几位入座吧”2．拉椅让座：先生、女士，请坐。
拉椅应从主人位开始，后向主宾位顺时针进行。
3．挂衣收包：先生、女士请问需要我帮忙吗？（您好，我帮您把衣服挂起来好吗？请您将需要物品取出，请不要将贵重物品放在里面）4．问茶、取茶：先生对不起，打扰您一下，请问您需要喝点茶水吗？我们有……5．沏茶:好的，您先休息一会儿，我现在就去给您沏茶。
标准：一、泡茶方法：泡茶最好选用瓷杯或茶壶，并注意水温，用70-80℃的水温泡茶最理想，可以保护茶的营养，味道香气，水温过低也会影响茶的质量，造成茶叶浮而不沉，达不到消毒的作用。
泡茶时不要一次将水加满，应先倒小半杯，等茶叶发散后在冲开水，冲水后立即盖上盖，以防香气散掉。
二、倒茶方法：左手执壶，右手放与后腰，右腿在前，左腿在后，不要贴近客人，禁止左右开弓，从主宾位顺时针斟倒。
斟倒量为八分满。
6．上毛巾：先生，女士请用热毛巾。
在上毛巾的过程中毛巾口的方向朝向客人方便使用。
7．倒茶：您好，这是您点的……请您慢用。
unit Main;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus, ComCtrls, ExtCtrls, StdCtrls, ToolWin, ImgList, Buttons, OleCtnrs,DB, DBTables, StdActns, ActnList, ExtDlgs, ConstStr_Sys, ContRec, Common, ConUnit, Grids, DBGrids, ADODB, DBCtrls, ShellAPI,FileCtrl, OleCtrls, SHDocVw, OleServer, ComObj, bsSkinCtrls, bsSkinData, BusinessSkinForm, bsSkinBoxCtrls, DSPack, DBClient, MConnect, SConnect, bsSkinMenus, DSUtil, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, UnitWordOpt, UnitConst, IdIPWatch;constdatewidth = 70;TimeWidth = 40;operaterwidth = 85;NUMLOCKWidth = 60;CAPITALWidth = 50;INSERTWidth = 0;NumUsed = 500;NumUsedDate = 30;Margin = 10;//查询库名常量IsAD = 0;IsAIAA = 1;IsDE = 2;IsIEEE = 3;IsSPIE = 4;IsJANES = 5;IsJANESPICTURE = 6;IScdpftd = 7;//标题栏宽度IDWidth = 90;TitleWidth = 560;PubDateWidth = 100;PageWidth = 70;PDFWidth = 70;//iOptMode:翻页操作类型，0首页，1上页，2下页，3末页IsOptFirst = 0;IsOptPrior = 1;IsOptNext = 2;IsOptEnd = 3;//iPageNum:每页记录个数MAXPAGERECORDNUM = 50;DEFAULTPAGERECORDNUM = 20;//返回值：0，表示到开始记录；1，表示到最末记录；2，表示在中间；-1表示为空或仅有一页IsInFirst = 0;IsInEnd = 1;IsInMiddle = 2;IsInEmpty = -1;//下载操作模式，0--单条，1--多条IsOneRecord = 0;IsMoreRecord = 1;//设置查找按钮IsBeforeSearchOpt = 0;IsAfterSearchOpt = 1;//字段名长度常量iFIELDLENG = 12;//写文件缓冲区大小BUFFERSIZE = 1024;//AD报告号路径值长度ADPATHLENCONST = 6;//显示位置COLLeft1 = 8;COLLeft2 = 116;COLLeft3 = 580;COLLeft4 = 685;COLLeft5 = 685;COLWidth1 = 103;COLWidth2 = 459;COLWidth3 = 100;COLWidth4 = 90;COLWidth5 = 0;ROWHEIGHT = 25;YSPACE = 5;TOPStart = 6;//显示的HTMLDATA文件HTMLDATAFILE = 'c:\HtmlFile.htm';iStepAdd_Auto_IDCount = 10;//查找类型IsNoSearch = -1;IsNewTableSearch = 0; //打开新文件查询IsSearch = 1; //查询IsSecondSearch = 2; //二次查询IsAdvanceSearch = 3;//高级查询//更新数据方式IsASC = 0;//升序IsDEC = 1;//降序//显示控件调整方式IsAddComponent = 0;//添加IsDelComponent = 1;//删除//全文文件类型FILEIsPDF = 0;FILEIsBMP = 1;//图片宽度附加值WIDTHADDLEN = 16;HEIGHTADDLEN = 36;//移动的颜色FONTCOLORMOVE = clBlue;FONTCOLORDEFAULT = clWindowText; FONTCOLORCLICK = clRed;//有新近有CDN站点，返回的信息是其IP地址SUCCESSINFORID = 88;//失败的信息提示ERRORINFORID0 = 0;//没有注册ERRORINFORID1 = 1;//MD5验证没有通过ERRORINFORID2 = 2;//没有空闲的连接对象ERRORINFORID3 = 3;//用户没有权限访问此数据库ERRORINFORID4 = 4;//超过系统PDF下载个数的权限ERRORINFORID5 = 5;//超过系统或设置的PDF下载个数权限ERRORINFORID6 = 6;//打开日志数据库失败ERRORINFORID7 = 7;//写日志数据库失败ERRORINFORID8 = 8;//用户没有权限访问此数据库ERRORINFORID9 = 9;//文件不存在ERRORINFORID10 = 10;//解密失败ERRORINFORID11 = 11;//ADOC连接失败ERRORINFORID12 = 12;//用户请求太快，请慢一些。
ERRORINFORID13 = 13;//没有新近的CDNWeb站点ERRORINFORID14 = 14;//有新近的CDNWeb站点，但该CDN没有该视频文件ERRORINFOR0 = '没有注册';ERRORINFOR1 = 'MD5验证没有通过';ERRORINFOR2 = '没有空闲的连接对象';ERRORINFOR3 = '用户没有权限访问此数据库';ERRORINFOR4 = '超过系统PDF下载个数的权限';ERRORINFOR5 = '超过系统或设置的PDF下载个数权限';ERRORINFOR6 = '打开日志数据库失败';ERRORINFOR7 = '写日志数据库失败';ERRORINFOR8 = '文件不存在';ERRORINFOR9 = '暂时不用';ERRORINFOR10 = '解密失败';ERRORINFOR11 = 'ADOC连接失败';ERRORINFOR12 = '用户请求太快，请慢一些。
';ERRORINFOR13 = '没有就近的CDNWeb站点';ERRORINFOR14 = '有就近的CDNWeb站点，但该CDN没有该视频文件';typeTDataBaseRecord = RecordTableConst:Integer;//表常量TableFileName:String;//数据库文件名称TableName:String;//英文名称CTableName:String;//中文名称PathTable:String;//路径表名称TableName_View:String;TableName_Result:String;PageNum:Integer;//页数RecordCount:Integer;//记录数LastPageRecordNum:Integer;//最后一页记录个数CurrentPageNum:Integer;//当前页号Auto_ID:String;//自动编号IDFilePath:String;//文件路径PriorViewName:String; //前一个视图CurrentViewName:String;//当前视图DoubleClickColIndex:Integer;//当前双击列序号end;TFoundListViewRecord = RecordCheckBoxSelected:TCheckBox;MemoContent1:TMemo;MemoContent2:TMemo;MemoContent3:TMemo;MemoContent4:TMemo;end;pFoundListViewRecord = ^TFoundListViewRecord;TFormMain = class(TForm) ImageListSpeedMenu: TImageList;ClDlg: TColorDialog;alstMain: TActionList;a_Windows: TAction;aColor: TAction;aBmp: TAction;Arrange1: TWindowArrange;Cascade1: TWindowCascade;Close1: TWindowClose;MinimizeAll1: TWindowMinimizeAll; TileHorizontally1: TWindowTileHorizontal; TileVertically1: TWindowTileVertical;a_Exit: TAction;aabout: TAction;ahelp: TAction;aReEnter: TAction;aExit: TAction;a_System: TAction;aQxsz: TAction;aXtbf: TAction;aXthf: TAction;aXtcsh: TAction;aSetupTbr: TAction;Timer1: TTimer;OpenPictureDialog1: TOpenPictureDialog; TimerAdd_ID: TTimer;bsBusinessSkinForm1: TbsBusinessSkinForm; bsSkinData1: TbsSkinData; bsCompressedStoredSkin1: TbsCompressedStoredSkin; bsSkinControlBar1: TbsSkinControlBar; bsSkinToolBar1: TbsSkinToolBar; bsSkinSpeedButton1: TbsSkinSpeedButton; bsSkinSpeedButton2: TbsSkinSpeedButton; bsSkinSpeedButton3: TbsSkinSpeedButton;bsSkinSpeedButton4: TbsSkinSpeedButton; bsSkinStatusBar1: TbsSkinStatusBar;bsSkinPanel_AviBackGround: TbsSkinPanel; bsSkinPanel_LogInfor: TbsSkinPanel;bsSkinSplitter1: TbsSkinSplitter;bsSkinPanel1: TbsSkinPanel;bsSkinMemo_LogInfor: TbsSkinMemo; bsSkinStdLabel1: TbsSkinStdLabel;FilterGraph: TFilterGraph;bsSkinBevel1: TbsSkinBevel;VideoWindow: TVideoWindow;DSTrackBar1: TDSTrackBar;bsSkinSpeedButton5: TbsSkinSpeedButton;btPlay: TbsSkinSpeedButton;btPause: TbsSkinSpeedButton;bsSkinSpeedButton8: TbsSkinSpeedButton; btFullScreen: TbsSkinSpeedButton;bsSkinBevel2: TbsSkinBevel;ImageList: TImageList;bsSkinSpeedButton10: TbsSkinSpeedButton; bsSkinSpeedButton11: TbsSkinSpeedButton; SocketConnection_FormMain: TSocketConnection; PopupMenu: TbsSkinPopupMenu;btStop: TbsSkinSpeedButton;N1: TMenuItem;N2: TMenuItem;N3: TMenuItem;N4: TMenuItem;IdTCPClient: TIdTCPClient;IdIPWatch1: TIdIPWatch;procedure MenuItemAboutClick(Sender: TObject); procedure FormCreate(Sender: TObject);procedure MenuItemUserClick(Sender: TObject); procedure N8Click(Sender: TObject);procedure MenuItemClearSelectAllClick(Sender: TObject); procedure N12Click(Sender: TObject);procedure N13Click(Sender: TObject);procedure FormResize(Sender: TObject);procedure MenuItemUserRegisterClick(Sender: TObject); procedure FormDestroy(Sender: TObject);procedure MenuItemExitClick(Sender: TObject); procedure MenuItemHowToUseClick(Sender: TObject); procedure ToolButton10Click(Sender: TObject); procedure ToolButtonInforSearchClick(Sender: TObject);procedure ListViewSearchResultDrawItem(Sender: TCustomListView;Item: TListItem; Rect: TRect; State: TOwnerDrawState);procedure ListViewSearchResultAdvancedCustomDrawItem(Sender: TCustomListView; Item: TListItem; State: TCustomDrawState;Stage: TCustomDrawStage; var DefaultDraw: Boolean);procedure ListViewSearchResultAdvancedCustomDraw(Sender: TCustomListView; const ARect: TRect; Stage: TCustomDrawStage;var DefaultDraw: Boolean);procedure ToolButton_SetSearchFieldsClick(Sender: TObject);procedure N11Click(Sender: TObject);procedure MenuItem_SelectAllClick(Sender: TObject);procedure N10Click(Sender: TObject);procedure ToolButtonIEEEClick(Sender: TObject);procedure ScrollBox1MouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);procedure ToolButton_DownLoadClick(Sender: TObject);procedure FormPaint(Sender: TObject);procedure bsSkinSpeedButton4Click(Sender: TObject);procedure bsSkinSpeedButton3Click(Sender: TObject);procedure bsSkinSpeedButton2Click(Sender: TObject);procedure bsSkinSpeedButton1Click(Sender: TObject);procedure FilterGraphDSEvent(sender: TComponent; Event, Param1,Param2: Integer);procedure btPlayClick(Sender: TObject);procedure btPauseClick(Sender: TObject);procedure btStopClick(Sender: TObject);procedure btFullScreenClick(Sender: TObject);private{ Private declarations }public{ Public declarations }StrA VIURL:String;CharCDDrive:Char;PageRecordNum:Integer;//页显示记录数bNewDataBase:Boolean;//新打开数据库bSearchChange1, bSearchChange2:Boolean;//调整查询结果，如页，记录总数等,b1:第一次后；b2:调整iSearchType:Integer; //查找类型iSaveOldRecordCount:Longint;bHasFinishedSearch:Boolean;TimeNow, TimeOld:TTime;IntCurrentListShowViewIndex:Integer;ListShowView:TList;DataBaseRecordVar:TDataBaseRecord;StrCurrentDocFileName:String;IntUserPower:Integer;IntCreateViewCount:Integer;StrSpendTime:String;iFirstDataBase:Integer;//第一次选择一个数据库运行。
