PASCAL函数过程表Word文档下载推荐.docx
《PASCAL函数过程表Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《PASCAL函数过程表Word文档下载推荐.docx（18页珍藏版）》请在冰点文库上搜索。
{123.0}
=Int（-123.456）;
{-123.0}
截尾函数trunc（x）
functionTrunc（X:
Longint;
X是实型表达式.Trunc返回Longint型的X的整数部分例子：
Writeln（1.4,'
becomes'
Trunc（1.4））;
{1}
Writeln（1.5,'
Trunc（1.5））;
Writeln（-1.4,'
becomes'
Trunc（-1.4））;
{-1}
Writeln（-1.5,'
Trunc（-1.5））;
四舍五入函数round（x）
functionRound（X:
X是实型表达式.Round返回Longint型的X的四舍五入值.如果返回值超出了Longint的表示范围，则出错.例子：
roundsto'
Round（1.4））;
Round（1.5））;
{2}
roundsto'
Round（-1.4））;
{-1}
Round（-1.5））;
{-2}
取小数函数frac（x）
functionFrac（X:
X是实型表达式.结果返回X的小数部分;
也就是说，Frac（X）=X-Int（_X）.例子：
R:
=Frac（123.456）;
{0.456}
=Frac（-123.456）;
{-0.456}
求平方根函数sqrt（x）和平方函数sqr（x）
平方根：
functionSqrt（X:
注意：
X是实型表达式.返回实型的X的平方根.平方：
functionSqr（X）:
X是实型或整型表达式.返回值的类型和X的类型一致，大小是X的平方，即X*X.
例子：
Writeln（'
5squaredis'
Sqr（5））;
{25}
Thesquarerootof2is'
Sqrt（2.0））;
{1.414}
2、所有单元
SYSTEMTP的运行库，包括常用的标准函数和过程，可以在程序中直接使用，不需USES语句说明。
DOS具有日期、时间、目录查找、程序执行等功能
CRT具有屏幕模式控制、扩展键盘码、颜色、窗口、声音等功能
PRINTER支持打印输出操作。
GRAPH高级图形软件包，支持多种图形适配器。
GRAPH3实现TP3.0的图形软件包。
TURBO3兼容TP3.0的源程序。
OVERLAY实现高级覆盖管理
3、SYSTEM单元
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写无类型文件
BREAKP中止或结束循环
CHDIR（PATH）P改变当前目录
CHR（X）F求ASCII码值为X的字符
CLOSE（F）P关闭文件
CONCAT（S1,S2...S3）F字符串合并
CONTINUEP继续循环
COPY（S,POS,LEN）F返回一个字符串的子串
COS（X）F余弦函数
CSEGF返回CS寄存器的当前值
DEC（X）FX:
=X-1
DELETE（S,POS,LEN）P删除一个字符串的子串
DISPOSE（P）P释放一个动态变量
DSEGF返回DS寄存器的当前值
EOF（F）F判断文件是否结束
EOLN（F）F判断文件类型中的一行是否结束
ERASE（F）P删除一个存在的外部文件。
EXITP过程中止
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分配变长的动态变量，并把块地址存放在一个指针变量中
HALTP立即中止程序执行，返回TP编辑器或DOS
HI（I）F返回一个变量的高位字节
INSERT（S,D,POS）F在一个字符串中某一位置开始插入一个子串
INTF取整数部分
IORESULTF返回最后一次输入/出操作的结果状态
LENGTH（S）F取字符串的长度
LN（R）F求自然对数
LO（I）F返回一个变量的低位字节
MAXAVAILF返回最大内存空间
MEMAVAILF返回可用内存数目
MKDIR（PATH）P建立一个子目录
MOVE（S,D,LEN）P快传送
NEW（P）P建立一个新的动态变量
ODD（X）F判断一个变量的值是否为奇数
OFS（X）F侧变量偏移地址
ORD（CH）F求一个字符的ASCII码值
PARAMCOUNTFDOS参数串长度
PARAMSTR（N）FDOS参数串
PIF圆周率的值
pos（str1,str2）f测一个字符串中包含的另一个子串的开始位置
pred（x）f求前驱
ptr（i）f指针赋值
randomf返回0~1之间的随机实数
randomizep初始化随机数发生器
read/readln（f,x）p读入/输入数据
rename（f,str）p给一个外部文件改名
reset（f）p打开文件，并将文件指针指向开始，并准备读数据
rewrite（f）p打开文件，并将文件指针指向开始，准备写资料
rmdir（path）p删除一个子目录
round（x）f求实数的近似数
runerrorp停止程序的运行
scrolltop滚动显示窗口的某部分内容
seek（f,n）p将文件指针定位于文件f的第n个文件成分上
seekrof（f）f定位到文件尾
seekroln（f）f定位到行尾
seg（n）f测变量段地址
settextbuf（f）p将输入/出缓冲区与一个文本文件建立关联
sin（x）f正弦函数
sizeof（x）f测变量大小
sptrf返回sp寄存器的当前值
sqr（x）f平方
sqrt（x）f平方根
ssegf返回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输出
4、DOS单元
dos单元常用过程与函数
getdatep返回系统当前日期
detftimep返回最后一次写入的日期和时间
gettimep返回系统当前时间
packtimep转换系统日期和时间，封装成4个字节的长整形格式
setdatep设置系统当前日期
setftimep写入新的系统日期和时间，覆盖系统最后一次写入的系统日期和时间文件
settimep设置系统当前时间
uppacktimep将系统日期和时间转换成纪录格式
diskfreef返回指定磁盘可用剩余空间
disksizef返回指定磁盘的总容量
get/setverityp返回/设置dos状态下的磁盘读写标记
fexpandf返回函数名的全称
fsearchf在一个目录中查找文件
fsplitf将一个文件名分成目录、文件名、扩展名
findfirstp在当前目录或指定目录下查找第一个与给定属性相匹配的文件名
findnextp返回下一个满足匹配条件的文件名
getfattrp返回文件的属性
setfattrp设置文件属性
gerintvecp返回某个中断变量值
intrp执行软中断
msdosp执行dos系统调用
setintvecp设定中断值
execp通过一个特定命令行执行特定程序段
keepp中断程序的执行但仍驻留在内存中
swapvectorsp用当前变量交换所有中断变量值
dosexitcodef回到子程序出口
dosversionf显示dos版本
5、CRT单元
crt单元
assigncrt（f）p将文本文件f与显示器crt建立联系
clreolp清除当前行光标所在位置以后的字符
clrscrp清除当前窗口或屏幕，光标返回到左上角
delay（t）p等待t毫秒
dellinep清除光标所在行上所有内容
gotoxy（x,y）p将光标移到屏幕某处
highvideop选择高亮度显示字符
inslinep在当前光标位置插入空行
keypressedf测定键盘输入状态
lowvideop低亮度显示字符
normvideop选择正常文本属性从光标所在位置开始显示字符
nosoundp关闭内部扬声器
readkeyp等待从键盘输入一个字符
sound（hz）p以hz指定的频率发声
textbackground（soor）p设置正文背景颜色
textcolor（color）p设置正文前景颜色
textmodep选择特定的文本显示模式
wherex/yf返回当前光标位置的坐标值
window（x1,y1,x2,y2）p在屏幕定义一个文本窗口
6、其他单元
其他单元
chain（f）p目标程序链接
execute（f）p执行目标程序
mark（p）p标记动态变量
release（p）p释放动态变量区
srtinitp屏幕初始化
crtlinep汉字屏幕方式转换
graphbackground（color）p选择背景色
graphcolormodep中分辨率彩色图形方式，320*200彩色
graphmodep中分辨率黑白图形方式，320*200黑白
graphwindow（x1,y1,x2,y2,color）p定义图形方式窗口
hiresp高分辨率单色图形方式，640*200黑白
hirescolor（color）p高分辨率彩色图形方式，640*200彩色
palette（color）p中分辨率彩色图形颜色组
ovrpath（path）p指定覆盖文件路径
draw（x1,y1,x2,y2,color）p画线
intr（n,m）p8086中断调用
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填充一个区域
7、其他常用函数
functionbinstr（value:
longint;
cnt:
byte）:
string;
将value转二进制，取后cnt个字符所成字串
functionlowercase（c:
charorstring）:
charorstring;
upcase的反函数
proceduresetlength（vars:
len:
longint）;
将s长度定为len
functionpower（base,expon:
real）:
real;
base的expon次方
strlcopy函数将一个字符串中的字符复制到另一个字符串中
strlen函数返回字符串中的字符数
strlfmt函数格式化一系列的参数，其结果中包含有指向目标缓冲区的指针
strlicomp函数以最大长度比较两个字符串（不区分大小写）
strlower函数将字符串中的字符转换为小写
strmove函数将一个字符串中的字符复制到另一个字符串中
strnew函数在堆栈上分配一个字符串
strpas函数将以null结束的字符串转换为pascal类的字符串
strpcopy函数将pascal类的字符串复制为以null结束的字符串
strplcopy函数从pascal类的最大长度字符串复制为以null结束的字符串
strpos函数返回一个字符串在另一个字符串中首次出现指针
strrscan函数返回字符串中最后出现字符的指针
strscan函数返回字符串中出现首字符的指针
strtodate函数将字符串转换为日期格式
strtodatetime函数将字符串转换为日期/时间格式
strtofloat函数将给定的字符串转换为浮点数
strtoint函数将字符串转换为整型
strtointdef函数将字符串转换为整型或默认值
strtotime函数将字符串转换为时间格式
strupper函数将字符串中的字符转换为大写
style属性类型选择
suce函数返回后继的参数
swap函数交换参数的高低地址位
tabs属性标记每一项的内容
tabindex属性标记索引
text属性显示的文本
texttofloat函数将字符串（以null结束的格式）转换为浮点数
time函数返回当前的时间
timetostr函数将时间格式转换为字符串
trim函数从给定的字符串中删除前导和尾部的空格及控制字符
trimleft函数从给定的字符串中删除首部的空格及控制字符
trimright函数从给定的字符串中删除尾部的空格及控制字符
trunc函数将实型值截取为整型值
truncate函数截去当前文件位置后的内容
unselectedcolor属性未选中颜色
upcase将字符转换为大写
uppercase将给定的字符串变为大写
val函数将字符串转换为整型值
vararraycreate函数以给定的界限和维数建立变体数组
vararraydimcount函数返回给定变体的维数
vararrayhighbound函数返回给定变体数组维数的上界
vararraylock函数锁定给定的变体数组
vararraylowbound函数返回给定变体数组维数的下界
vararrayof函数返回指定变体的数组元素
vararrayredim函数通过改变上限来调整变体的大小
vararrayunlock函数解锁指定的变体数组
varastype函数将变体转换为指定的类型
varcase函数将变体转换为指定的类型并保存他
varclear函数清除指定的变体
varcopy函数将指定的变体复制为指定的变体
varformdatetime函数返回包含日期时间的变体
varisarray函数测试变体是否为数组
varisempty函数测试变体是否为unassignedvarisnull函数测试变体是否为null
vartodatetime函数将给定的变体转换为日期时间
vartype函数将变体转换为指定的类型并保存他
visible属性控件的可见性
wantreturns属性为true时，按回车键产生一个回车符；
为false时，按下ctrl+enter才产生回车符write命令对有格式的文件，写一变量到文件组件中；
对文本文件，写一个或多个值到文件
8、其他不常用函数
Addr
语法functionAddr（varf:
text）;
说明addr返回一个变量，类型或过程的地址。
结果为指针类型
assigncer
语法procedureassigncrt（varf:
file;
name:
string）;
说明将文件f的内容输于显示器上
bolckread
语法procedureblockread（varf:
varb:
type;
numrecs:
integer;
varecsread:
integer）;
说明从无类型文件f中读出number个记录，放在缓冲区b.recsread表示了实际读出的记
录数。
只有pc\ms-dos版才支持recsread
bolckwrite
语法procedureblockwrite（varf:
说明从缓冲区b读出numrecs个记录至无类型文件中。
chdir
表示的目录.语法procedurechdir（s:
说明将当前的目录换为s所
filesize
语法function（f:
file）:
说明返回f当前所含的记录数。
filepos
说明返回文件f指针所指向的记录号
fillpoly（dos）
语法frocedurefillpoly（munpoints:
word;
varpolypoints）;
说明用munpoints个点画一个多边形，数组munpoints含多边形的顶点坐标
flush
说明procedureflush（varf:
file）
语法刷新用于输出文件f的全部磁盘缓冲区
frac
语法functionfrac（r:
说明返回实数r的小数部分
fsearch（dos）
语法functionfsearch（path:
pathstr;
dirlist:
string）:
pathstr
说明查找dirlist目录中的与path相匹配的文件。
如果找到则以一个字符串返回结果，否则返回的函数值为一空串
insline
语法procedureinsline;
说明在当前光标的所在位置插入一空行
mark
语法proceduremark（p:
pionter）
说明贮存了当前堆顶端知底于指针p中
maxavaih
语法functionmaxavil:
longint
说明返回堆中最大的自由块的尺寸
menavail
语法functionmemavail:
说明返回堆中自由空间的总长度
mkdir
语法proceduremkdir（s:
string）
说明以字符串s命名建立一个目录（文件夹）
parammstr
语法functionparamstr（i;
word:
说明返回命令行所指定的参数。
例如paramstr
（1）返回第一个参数。
在dos3.0以上的版本返回执行文件的路径和文件名
randomize
语法functionrandomize;
说明初始化随机产生程序。
其基数存放在长
升级会员 