turbo pascal 标准库单元中的过程和函数 turbo pascal提供八大类标准库单元 标准库单元及功能 单元名 主要功能 -------------------------------------------------------------------------------- SYSTEM TP的运行库，包括常用的标准函数和过程，可以在程序中直接使用，不需USES语句说明。 DOS 具有日期、时间、目录查找、程序执行等功能 CRT 具有屏幕模式控制、扩展键盘码、颜色、窗口、声音等功能 PRINTER 支持打印输出操作。 GRAPH 高级图形软件包，支持多种图形适配器。 GRAPH3 实现TP3.0的图形软件包。 TURBO3 兼容TP3.0的源程序。 OVERLAY 实现高级覆盖管理 -------------------------------------------------------------------------------- SYSTEM单元常用过程与函数 单元名 主要功能 -------------------------------------------------------------------------------- ABS(X) F 求变量的绝对值 ADDR(X) F 测变量地址 APPEND(F) P 打开一个存在的文本文件，并将文件指针指向文件末尾准备添加元素 ARCTAN(X) F 反正切 ASSIGN(F,C) P 将字符串C所表示的外部文件名赋给文件变量F ASSIGNED(X) P 测试程序当中的指针或变量是否为空 BLOCKREAD(F,D,NUM) P 读类型文件。 BLOCKWRITE(F,D,NUM) P 写无类型文件 BREAK P 中止或结束循环 CHDIR(PATH) P 改变当前目录 CHR(X) F 求ASCII码值为X的字符 CLOSE(F) P 关闭文件 CONCAT(S1,S2...S3） F 字符串合并 CONTINUE P 继续循环 COPY(S,POS,LEN) F 返回一个字符串的子串 COS(X) F 余弦函数 CSEG F 返回CS寄存器的当前值 DEC(X) F X:=X-1 DELETE(S,POS,LEN) P 删除一个字符串的子串 DISPOSE(P) P 释放一个动态变量 DSEG F 返回DS寄存器的当前值 EOF(F) F 判断文件是否结束 EOLN(F) F 判断文件类型中的一行是否结束 ERASE(F) P 删除一个存在的外部文件。 EXIT P 过程中止 EXP(X) F 以E为底的指数函数 FILEPOS(F) F 文件记录的当前位置 FILESIZE(F) F 文件记录数 FILLCHAR(D,LEN,DATE) P 填充数值或字符 FLUSH(F) P 清空文件缓存区 FRAC(X) F 取实形变量的小数部分 FREEMEM(P,I) P 释放变长动态变量 GETDIR(DRV,PATH) P 取当前盘，当前目录 GETMEM(P,I) P 分配变长的动态变量，并把块地址存放在一个指针变量中 HALT P 立即中止程序执行，返回TP编辑器或DOS HI(I) F 返回一个变量的高位字节 INSERT(S,D,POS) F 在一个字符串中某一位置开始插入一个子串 INT F 取整数部分 IORESULT F 返回最后一次输入/出操作的结果状态 LENGTH(S) F 取字符串的长度 LN(R) F 求自然对数 LO(I) F 返回一个变量的低位字节 MAXAVAIL F 返回最大内存空间 MEMAVAIL F 返回可用内存数目 MKDIR(PATH) P 建立一个子目录 MOVE(S,D,LEN) P 快传送 NEW(P) P 建立一个新的动态变量 ODD(X) F 判断一个变量的值是否为奇数 OFS(X) F 侧变量偏移地址 ORD(CH) F 求一个字符的ASCII码值 PARAMCOUNT F DOS参数串长度 PARAMSTR(N) F DOS参数串 PI F 圆周率的值 pos(str1,str2) f 测一个字符串中包含的另一个子串的开始位置 pred(x) f 求前驱 ptr(i) f 指针赋值 random f 返回0~1之间的随机实数 randomize p 初始化随机数发生器 read/readln(f,x) p 读入/输入数据 rename(f,str) p 给一个外部文件改名 reset(f) p 打开文件，并将文件指针指向开始，并准备读数据 rewrite(f) p 打开文件，并将文件指针指向开始，准备写资料 rmdir(path) p 删除一个子目录 round(x) f 求实数的近似数 runerror p 停止程序的运行 scrollto p 滚动显示窗口的某部分内容 seek(f,n) p 将文件指针定位于文件f的第n个文件成分上 seekrof(f) f 定位到文件尾 seekroln(f) f 定位到行尾 seg(n) f 测变量段地址 settextbuf(f) p 将输入/出缓冲区与一个文本文件建立关联 sin(x) f 正弦函数 sizeof(x) f 测变量大小 sptr f 返回sp寄存器的当前值 sqr(x) f 平方 sqrt(x) f 平方根 sseg f 返回ss寄存器的当前值 str(i,s) f 将一个整数转换成字符串 succ(X) f 后继函数 swap(x) f 交换一个变量的高位和低位字节 trunc(x) f 截去实数的小数部分 truncate(f) p 截去文件当前指针以后的内容 upcase(ch) f 将小写字母转换成大写字母 val(s,r,p) p 将一个字符串转换成数值 writeln(f,x) p 输出 -------------------------------------------------------------------------------- dos单元常用过程与函数 单元名 主要功能 -------------------------------------------------------------------------------- getdate p 返回系统当前日期 detftime p 返回最后一次写入的日期和时间 gettime p 返回系统当前时间 packtime p 转换系统日期和时间，封装成4个字节的长整形格式 setdate p 设置系统当前日期 setftime p 写入新的系统日期和时间，覆盖系统最后一次写入的 系统日期和时间文件 settime p 设置系统当前时间 uppacktime p 将系统日期和时间转换成纪录格式 diskfree f 返回指定磁盘可用剩余空间 disksize f 返回指定磁盘的总容量 get/setverity p 返回/设置dos状态下的磁盘读写标记 fexpand f 返回函数名的全称 fsearch f 在一个目录中查找文件 fsplit f 将一个文件名分成目录、文件名、扩展名 findfirst p 在当前目录或指定目录下查找第一个与给定属性相匹 配的文件名 findnext p 返回下一个满足匹配条件的文件名 getfattr p 返回文件的属性 setfattr p 设置文件属性 gerintvec p 返回某个中断变量值 intr p 执行软中断 msdos p 执行dos 系统调用 setintvec p 设定中断值 exec p 通过一个特定命令行执行特定程序段 keep p 中断程序的执行但仍驻留在内存中 swapvectors p 用当前变量交换所有中断变量值 dosexitcode f 回到子程序出口 dosversion f 显示dos版本 -------------------------------------------------------------------------------- crt单元 单元名 主要功能 -------------------------------------------------------------------------------- assigncrt(f) p 将文本文件f与显示器crt建立联系 clreol p 清除当前行光标所在位置以后的字符 clrscr p 清除当前窗口或屏幕，光标返回到左上角 delay(t) p 等待t毫秒 delline p 清除光标所在行上所有内容 gotoxy(x,y) p 将光标移到屏幕某处 highvideo p 选择高亮度显示字符 insline p 在当前光标位置插入空行 keypressed f 测定键盘输入状态 lowvideo p 低亮度显示字符 normvideo p 选择正常文本属性从光标所在位置开始显示字符 nosound p 关闭内部扬声器 readkey p 等待从键盘输入一个字符 sound(hz) p 以hz指定的频率发声 textbackground(soor) p 设置正文背景颜色 textcolor(color) p 设置正文前景颜色 textmode p 选择特定的文本显示模式 wherex/y f 返回当前光标位置的坐标值 window(x1,y1,x2,y2) p 在屏幕定义一个文本窗口 -------------------------------------------------------------------------------- 其他单元 单元名 主要功能 -------------------------------------------------------------------------------- chain(f) p 目标程序链接 execute(f) p 执行目标程序 mark(p) p 标记动态变量 release(p) p 释放动态变量区 srtinit p 屏幕初始化 crtline p 汉字屏幕方式转换 graphbackground(color) p 选择背景色 graphcolormode p 中分辨率彩色图形方式，320*200彩色 graphmode p 中分辨率黑白图形方式，320*200黑白 graphwindow(x1,y1,x2,y2,color)p 定义图形方式窗口 hires p 高分辨率单色图形方式，640*200黑白 hirescolor(color) p 高分辨率彩色图形方式，640*200彩色 palette(color) p 中分辨率彩色图形颜色组 ovrpath(path) p 指定覆盖文件路径 draw(x1,y1,x2,y2,color) p 画线 intr(n,m) p 8086中断调用 plot(x,y,color) p 画点 random(integer) f 产生随机整数 seg(x) f 测变量段地址 colortable(c1,c2,c3,c4) p 重定义颜色组 arc(x,y,radius,color) p 画圆弧 circle(x,y,radius,color) p 画圆 getpic(buffer,x1,x2,y1,y2) p 屏幕转储到屏幕 putpic(buffer,x,y) p 缓冲器转储到屏幕 getdotcolor(x,y) p 读点 fillscreen(color) p 填充屏幕 fillshape(x,y,fillcol,bordercol) p 填充一个区域