《[计算机软件及应用]Delphi 70常用函数速查手册.doc》由会员分享，可在线阅读，更多相关《[计算机软件及应用]Delphi 70常用函数速查手册.doc（61页珍藏版）》请在三一文库上搜索。
1、Delphi 7.0常用函数速查手册上一篇 / 下一篇 2008-04-09 10:38:57 / 个人分类：Delphi 查看( 95 ) / 评论( 0 ) / 评分( 0 / 0 ) 51Testing软件测试网+ZlF?p)? 7e0s6wg4k/l8a0 -H&m-ZaE#ug(s9j0m5PU-j;_X0函数由一句或多句代码组成，可以实现某个特定的功能。使用函数可以使代码更加易读、易懂，加快编程速度及减少重复代码。过程与函数类似，过程与函数最重要的区别在于，过程没有返回值，而函数能有返回值。 w9h.C#b(J/?X$TR0在Delphi 7.0中，已为我们定义好了非常多的函数，大
2、致分类有6种：数据类型转换函数、字符串、数组操作函数、文件、磁盘操作函数、内存、指针操作函数、数学运算函数、日期函数。Ju RuPVl051Testing软件测试网5or.E4|6X(su) 在Delphi中调用函数，一般情况下可以直接使用函数即可，但由于有一些函数未包含在Uses中列出的单元中(默认单元有Windows,Messages,SysUtils,Variants,Classes,Graphics, Controls,Forms,Dialogs;)，所以需要我们手动添加单元。比如，MidStr函数就未包含在这些单元中，MidStr所属单元在StrUtils中，因此我们将StrUtil
3、s添加Uses中即可。1Tm1x2K0 8E*V+Hyx T(S(d0在本手册中，凡是未包含在默认列出的单元中的函数，都标明了其所属的单元，使用时应当注意。6C;)X1hEP1n6 b0 一、数据类型转换函数pw A4iI0在我们编写程序当中，根据不同情况，会使用到多种数据类型。当要对不同的类型进行操作时，必须要将不同的类型转换成同样的类型。因此熟练地掌握数据类型的转换是非常重要的。b%Th4r70 1.FloatToStr51Testing软件测试网&jI yn7q 功能说明：该函数用于将“浮点型”转换成“字符型”。51Testing软件测试网f4?B?Z751Testing软件测试网 E
4、M3hP$Cj 参考实例：x9T Z#aH051Testing软件测试网 EiAuf/G Edit1.Text := FloatToStr(1.981);)?Y3qCO:Ov(C0 2.IntToStrC6O0t?9E Ac J0Y0功能说明：该函数用于将“整数型”转换成“字符型”。51Testing软件测试网7T%EhrU:(G51Testing软件测试网 bN+X)bnj 参考实例：51Testing软件测试网|TDi8U/E51Testing软件测试网d.R+z$k L S := IntToStr(10);(注：S为String类型变量。)51Testing软件测试网!k%v&P*h$x
5、PrG3.IntToHexPH2j&s1Ff T0功能说明：该函数用于将“十进制”转换成“十进制”。该函数有二个参数。第一个参数为要转换的十进制数据，第二个参数是指定使用多少位来显示十六进制数据。51Testing软件测试网K#GKL kV:l$d8k/Y!at6a5oI0参考实例：T)IrWu!NJn Iz051Testing软件测试网7LJ;fp CJ.WJ Edit1.Text := IntToHex(100, 2);Mis.*tkZ051Testing软件测试网9Lv6CO#pZ5Oko u 执行结果，Edit1.Text等于64。8N-q Q ?fK5WH0 Km HIOOC0注意：
6、Delphi没有提供专门的“十六进制”转换为“十进制”的函数。使用StrToInt函数可以实现这个功能。具体代码是：I := StrToInt(S + 64); 这时I等于100。加上一个S即可将“十六进制”转换为“十进制”。51Testing软件测试网-?&CDW0a1w/Iv%Q4.StrToInt9Gc#TD8d h5N0功能说明：该函数用于将“字符型”转换成“整数型”。51Testing软件测试网$4U5A5bD,fyB1Q&CM9fI0参考实例：51Testing软件测试网eW-Fm&d+s:FW6OOZz/BkpN4V0I := StrToInt(100);0N?M051Testi
7、ng软件测试网|kS*gWO1P 注意：不能转换如 StrToInt(ab)或StrToInt(好)这样的类型，因为他们并不存在数字型。51Testing软件测试网7f(Gox,7k%g5.StrToFloat51Testing软件测试网6G$qX 功能说明：该函数用于将“字符型”转换成“浮点型”。VE7C8T4Xk051Testing软件测试网:KK8dX+A 参考实例：51Testing软件测试网8X+g-+K R a0Sv(wf bOL?|5b:l0N := StrToFloat(Edit1.Text);51Testing软件测试网y4oH00l Ie.Bf ?/EC0注意：Edit1.
8、Text中的内容为1.981(凡在Edit控件中显示的文本均为字符串)。N为Double类型，用于保存转换后的浮点型数据。.%O H F _Z+zg S0 二、字符串、数组操作函数WFLSE*E0对字符串及数组的操作，是每个程序员必须要掌握的。熟练的使用这些函数，在编程时能更加得心应手。51Testing软件测试网ql tDl$OY1.Copy8w4sWdOI0功能说明：该函数用于从字符串中复制指定范围中的字符。该函数有3个参数。第一个参数是数据源(即被复制的字符串)，第二个参数是从字符串某一处开始复制，第三个参数是要复制字符串的长度(即个数)。最后函数返回一个新的字符串(即是我们指定要复制的
9、字符串内容)。51Testing软件测试网v$o%C;f$B51Testing软件测试网3J6Ii(C2U4y 参考实例：51Testing软件测试网oyt2Xw51Testing软件测试网7?_eS W-#dx var51Testing软件测试网5cS x-o1C4FmtmnTB 7ad0 S: String;8hOV8A%G.|k051Testing软件测试网8B.3NqG MyStr: String; / 保存新的字符串4E-z6B;d*Yyz0 Aw!e*X0begin$V7K(n:t5|z051Testing软件测试网Cnq.qQCG3ZA S := I Love China!;X-
10、M/xsV n0 v1udQl4|M0/下面将获取I Love China中的“Love”字符串。-Ok:g*p w); C0 %b2_6J(U%t;YO*0MyStr := Copy(S, 3, 4);51Testing软件测试网0B&GXs2Oz*l.9uf8E0end;51Testing软件测试网dHZo,r32W/CMa.uH:;O0执行结果，MyStr等于“Love”，“Love”字符串在“I Love China!”中第3个位置开始，所以第二个参数为3，“Love”一共有4个字符，所以第三个参数为4。51Testing软件测试网S98_*T0m-H9c&O2.Concat51Tes
11、ting软件测试网N +|yR 功能说明：连接两个或多个字符串为一个字符串。51Testing软件测试网4K A.X&H g B|7Z-a&m4hA)x1 e0参考实例：51Testing软件测试网p J-a!i*Y z2ieU251Testing软件测试网#/IY6Qe/Leq var3kfl-S(E051Testing软件测试网e$?x(A9i?Hu S1, S2: String;51Testing软件测试网 d*C RJ-WiK m51Testing软件测试网F6QFc-V1 beginh c#_t0 kM E$J0 S1 := Concat(A, B); / 连接两个字符串，S1变量等
12、于AB。51Testing软件测试网m:y$C*u*YM:jRL?Xae7LN0 S2 := Concat(Borland, Delphi, 7.0); / 连接三个字符，S2变量等于Borland Delphi 7.0。51Testing软件测试网 f8UPxYv#E&V ObHgh?0end;51Testing软件测试网p CA*-I:FQ3.Delete_ s5Cj9X0功能说明：删除字符串中指定的字符串。该函数有三个参数。第一个参数为要进行处理的字符串，第二个参数为从何处开始删除，第三个参数为删除的字符个数。51Testing软件测试网&s-HgK6j4vD251Testing软件测试
13、网ENn4G6_z#)B#o 参考实例：51Testing软件测试网E*z;y +a7I%I%X$z XtF:GMl8Xg%ow0varT#Fpl:U4F051Testing软件测试网QX%r7j./Z3s S: String;4A3E G&G8o DzU-*l051Testing软件测试网QhMn(Vy beginS-i V(eY9f V0 6z(Di$l7I:P hz0 S := I Like Reading CPCW.;51Testing软件测试网d+Y T&J*gscfZ/m1Mpi8U0 / 下面的代码将删除S变量中的“C”字符。51Testing软件测试网TjSv51Testing
14、软件测试网:v5DbR y*e/C;I+w Delete(S, 16, 1);m?cf)BJ0 8m&OF. k K%-W?0end;f Z5TVY Y051Testing软件测试网-x(i&u di(p 此时S变量则是I Like Reading PCW.(“C”已经不存在了)。(?PT1P 0 4.High51Testing软件测试网 pv7Ft N 功能说明：返回数组下标的最大值。51Testing软件测试网|$U.s9_ nE1F0参考实例：51Testing软件测试网8P s+N.z?.G8Izh?A!da51Testing软件测试网:C(ql6n3dG var51Testing软件
15、测试网%Wa e1X!-m-d hzXA(6M I Tvd_0 arrText: array0.9 of Char;p#l(y,s;T:c:a)P3r0 (W aG#GpK%I?8s+i0 i: Integer;8c_m051Testing软件测试网 D xGBw5Qw begin/JLJ3s)X6Z0051Testing软件测试网R W,gu8Z K i := High(arrText); / i的值则为951Testing软件测试网&x%r.I um2S51Testing软件测试网h0bObHp?G end;51Testing软件测试网:Z&po1ok4f5.Insert6H%3)a P
16、d$C& l8S)r0功能说明：插入一个字符(串)。该函数有三个参数。第一个参数为要插入的字符(串)，第二个参数为被插入字符串(源字符串)，第三个参数为从何处插入。0k+YCkMw051Testing软件测试网/|_ok 1U e 参考实例：*Kxq8;L.v3CvBw051Testing软件测试网Y giT1y:P:uy varV9?Xry0 &X/e3V-CL0 S: String;51Testing软件测试网8XId5QW|b.J7CU+zt,oB0begin51Testing软件测试网:iS),|Y N I|;Vy51Testing软件测试网VA-B l1l S := Wat is y
17、our name?;51Testing软件测试网Aqtctl!J2q0?Z9Rlm;f0 / 上面句子中的What单词查一个“h”字符，下面使用Insert函数将h添加进去。51Testing软件测试网bT1y_F-l R51Testing软件测试网.qL/f#P*EUu Insert(h, S, 2); / 将“h”从第2位处插入。51Testing软件测试网/pu(WQ3D6v51Testing软件测试网h gPPHb0F_X end;hrg*qVCF0 6.LeftStr(所在单元：StrUtils)6r#|4f3x)y/BQq0功能说明：返回字符串左边指定个数的新字符(串)。该函数有两
18、个参数。第一个参数为完整的字符串，第二个参数为指定个数。/lzf9sDy0 (Vq4A ?#R0参考实例：51Testing软件测试网DR1r,L1:L,GE51Testing软件测试网 :C6Yj:Lz4o var7PRrl;U6MGC051Testing软件测试网Y,Qu2aZX;s0Jb!| S, A: String;#D8br:OM*0 M r L KMin6UA0begintc g0 &HSsD&CP:kmO0 S := MSN Messenger;6T%_v:Qs?t u0 cn!jhsU |0 A := LeftStr(S, 3); / 从最左边开始，获取左边的三个字符。因此A变
19、量则等于MSN。c:e%fBT0 rEw8ef0end;51Testing软件测试网0KPFof5b#gW7.Length51Testing软件测试网$N%?#:KL3W8 HO 功能说明：该函数用于统计指定字符串的长度(即个数)。51Testing软件测试网r%vz6tO;$O51Testing软件测试网01l? fx%D?%yf 参考实例：51Testing软件测试网-M6G%;PU!dSMhd51Testing软件测试网j1PV _ N8TR2 var51Testing软件测试网D-OS -qp;w#v.|51Testing软件测试网I3Y#hU5Ng&bw M+c nLen1, nLe
20、n2: Integer; / 用于保存字符串长度&UOv7onlg.T JU7S051Testing软件测试网!ap1a _.fV_3wM:My begin51Testing软件测试网%s _*L0BU )yn6 RaU0 nLen1 := Length(CPCW);7 T-xG5C6N )O6h051Testing软件测试网4iuYbiK|Mb nLen2 := Length(电脑报);Dpa;YCEc5G051Testing软件测试网f!vNe;cn end;51Testing软件测试网0vj0_:t HRS ov.kwI0执行结果，nLen1等于4，nLen2等于6。由于一个汉字相当于两
21、个字符的长度，所以3个汉字的长度为6。51Testing软件测试网Rcy;lGLN8.Low-Y6A$wuV&AbL0功能说明：返回数组下标的最小值。51Testing软件测试网?%GHYY3D51Testing软件测试网j |ZpT 参考实例：&c3Q W%nC051Testing软件测试网V1*H:|0y3j var51Testing软件测试网/tGLO K;G1CUS51Testing软件测试网2G-o/L:a c.O,JI arrText: array1.9 of Char;51Testing软件测试网$K%M niW_xX_5FlF0 i: Integer;51Testing软件测试
22、网+kG2Gy!k_+Mz(off0begin51Testing软件测试网$PjX:%J 7,p8zqX51Testing软件测试网?c2C, k1C+ISQ/! i:= High(arrText); / i的值则为1Db TvEaq|051Testing软件测试网+OU oqVaP(t end;3x Y#fLuZ2W0 9.LowerCase51Testing软件测试网4nYD6Im ?cmJ 功能说明：将字符(串)中的英文字符转换为小写。Rt5Z%aS _!Xu0 j9RW+c0w*r0参考实例：51Testing软件测试网+|;QI q-?, N51Testing软件测试网g2V&y s
23、1V,h RN|%K var-BPsxMln051Testing软件测试网&KV;Bpw7k S, A: String;51Testing软件测试网V6K i8wL|d L7 Y esw+etZ0begin-5yw fC-h9Uu051Testing软件测试网&x:j&J0C$n S := ABC;51Testing软件测试网uo+i&AY51Testing软件测试网k%r4GoOQ8r!u A := UpperCase(S); / 经过UpperCase函数转换后，A则等于abc。|b F.Nc Oyl0 h+GxY&p0end;51Testing软件测试网r*uo9_*7C7tg10.Mi
24、dStr(所在单元：StrUtils)3T6T6Y6Gy td H0功能说明：返回指定范围内的字符串。该函数有三个参数。第一个参数为源字符串，第二个参数为起点，第三个参数为结束点。通过第二、第三个参数则可指定要复制字符串的范围。+uy3|,A1T:_0 4tT%Ec 0Copy函数与此函数类似。MidStr主要用于处理含有中文字符的字符串。51Testing软件测试网/w8CR2g P/F#v s*i+P z+TXbY qO-EW0参考实例：EeNu& b/dxz051Testing软件测试网 K!nN#TwRD: var6ci&j0|Y/l0 3W%|l!K5S:a&ox.?+u0 S: S
25、tring;51Testing软件测试网kd2 CH&BN2uV5a KC f8p*E0 H: String;51Testing软件测试网v/C wjWW4?sN tr#jLl0begin51Testing软件测试网8z:l,D HZb*VK!m8Zaq:V$r%0 S := MidStr(China, 1, 2); / S变量为Ch51Testing软件测试网AFb.a L08Rw%3T9o9G0 H := MidStr(电脑报, 1, 1); / H变量为“电”。如果使用Copy函数，则应是H := Copy(电脑报, 1, 2)，否则返回的将不是“电”字。因此在使用操作含有中文的字符串时
26、，最好使用MidStr。Q.C*|Are-NxL051Testing软件测试网)i f?a end;51Testing软件测试网H e$ZVcc+b11.Pos51Testing软件测试网RLg6Q A 功能说明：查找字符(串)所在位置。该函数有二个参数。第一个参数为要查找的字符(串)，第二个参数为被查找字符(串)。51Testing软件测试网W Y9V7F?(d!Wt*0j)wA$bO;y0参考实例：51Testing软件测试网# -Y&BZH Tr.m N vX0var51Testing软件测试网 G&Z+C5EH w&exO/lyK.SD D.l? Vk0 nPos: Integer;
27、/ 用于保存查找的字符所在位置jmzFx2|.n0 rW rQkgy0beginb!Np)T0 l7Z6x:LdKh&P0 nPos := Pos(Like, I Like Reading!);51Testing软件测试网7o(a mXrK j?kZ M.f&bGd0end;51Testing软件测试网ae_|3k M0AC51Testing软件测试网F0a Vb2f nX 此时nPos等于3。如果没有查找到，则nPos为0。51Testing软件测试网 GKpukV51Testing软件测试网YCr5H? 注意：Pos函数在查找时是要区分字符大小的。如果要实现不区分大小，那么需要使用Uppe
28、rCase或LowerCase函数将两个参数的字符(串)转换为“大写”或“小写”再进行查找。51Testing软件测试网9j;B8DH*V/Q;N51Testing软件测试网 Cxk6 DY4K?kg 另外还有一个查找字符(串)的函数-AnsiPos，该函数的使用方法与Pos函数完全一样。当你查找的是汉字时，最好使用AnsiPos函数。51Testing软件测试网q1XOE:LEKc12.RightStr(所在单元：StrUtils):ST17N)o#J%2v T0功能说明：返回字符串右边指定个数的新字符(串)。该函数有两个参数。第一个参数为完整的字符串，第二个参数为指定个数。_g3uW X
29、9k1z I051Testing软件测试网?,IZ W.S%4P 参考实例：51Testing软件测试网%_Ch/u N)k*p$JW$NylAx)l,Z0varv?f%f? Jm0 9 psA00 S, A: String;51Testing软件测试网V,j63%B8q7B;O51Testing软件测试网 rzaU*wusA begin51Testing软件测试网$W.R f)Q2M d%LH%mXS*M L80 S := MSN Messenger;HV k DK o,NGy:j0 OR)X!Q!?ZA0 A := RightStr(S, 3); / 从最右边开始，获取右边的三个字符。因此
30、A变量则等于ger。51Testing软件测试网f+a-GX-Bn1q3|_r51Testing软件测试网 X v*U!gi S+R end;51Testing软件测试网8ag GvA13.SetLength51Testing软件测试网H+J v7r z(UNu)q 功能说明：设置字符串或动态数组长度。该函数有两个参数。第一个参数为要设置的字符串变量或动态数组变量，第二个参数为指定的长度，其取值范围在0到255之间。51Testing软件测试网6anCxB51Testing软件测试网Dts6BAPnA 参考实例：wg+G/xc -Q4B051Testing软件测试网&sSC/A7UQ varg
31、:k*d5ph;q7Y0 )dy6Iw0 S: String;H a$o.j9 i051Testing软件测试网/C9mY$gVg$ex arrText: array of Char; / 定义一个动态数组51Testing软件测试网,W6ru8gKa76P I51Testing软件测试网4LI8J6Pq0m-|&wB begin51Testing软件测试网dx5j6H.y6o51Testing软件测试网6U2O g r SetLength(S, 10); / 当设置后，S变量只能赋值长度为10的字符串。51Testing软件测试网(a +_3wyRWl+N/h P(T0 SetLength(
32、arrText, 10); / 只有使用SetLength为动态数组分配内存空间后才能使用动态数组。这句代码的作用相当于arrText: array0.9 of Char51Testing软件测试网3Yw!b1G)QY M F+d51Testing软件测试网Z#H q#foB end;7I/y -C9Jd h%z F0 14.StrPCopy2A0M-r&s3PJq0功能说明：将字符串复制到字符数组中。该函数有两个参数。第一个参数为“目标数组”，第二个参数为“字符串”。51Testing软件测试网h$y$J(E*D8pMG4hxzQQv0参考实例：51Testing软件测试网4skh#Dhz
33、M X&W7e51Testing软件测试网&GiPN +Sku var51Testing软件测试网#hB-Bc,f/f$LAH%Uv2j3mU0 arrChar: array0.255 of Char; / 这里声明了长度为256的Char型数组51Testing软件测试网G,o K/kb &qs/uD )Fy; Dp,s7x0begin;fp iMV/Y051Testing软件测试网rHGqovp StrPCopy(arrChar, Come on, baby!);51Testing软件测试网|5SA4B#bP,bM1a C51Testing软件测试网m3Z ZO0vsU:B.$Z end;
34、0xs7W_ c YyzP0 15.TrimXz,I.M%eo,R8b Bz F0功能说明：删除字符串左右两边的空格(无论左右两边有多少个空格均被全部删除)。51Testing软件测试网YKp8u:O%i;F-w&n oJ5a0参考实例：51Testing软件测试网8H6hV7vgPGw0Sr?0var0|/n4YT#l!Hpf*0 &y;p6W,KS0 S: String;OLXgQ5-d051Testing软件测试网WJ6CJ begin12_9X#uZ0 Z2 _v1T9anMs6w0 S := Delphi 7.0 ;u+w4T4t)u051Testing软件测试网2QG1Q BLc1
35、x1w S := Trim(S);51Testing软件测试网Ubn.T|8M6sJ&A$HFf0end;6 b$HW2T3g( Oi6t0 16.TrimLeft51Testing软件测试网:b;_f ?3O 功能说明：删除字符串左边的空格(无论左边有多少个空格均被全部删除)。o C H4i5t.v0 ;kmf8v;LyUW0参考实例：51Testing软件测试网 r+vT_0a51Testing软件测试网+tHG/j S := TrimLeft( Delphi);51Testing软件测试网mtg6KE-Le17.TrimRight51Testing软件测试网S3qA%?Ey E 0G 功
36、能说明：删除字符串左边的空格(无论左边有多少个空格均被全部删除)。5UbP2lneJI-y9 x051Testing软件测试网#U,g C8W/LH 参考实例：51Testing软件测试网M*S GU$m$_ f*ATm3w;0 S := TrimRight(Delphi );L6r!f z4zC ZOMRZ90 18.UpperCasePw&PI+n0功能说明：将字符(串)中的英文字符转换为大写。A2H%N1Sl!g Ojb051Testing软件测试网a3m+_d2L-q 参考实例：51Testing软件测试网appPI-Z;L51Testing软件测试网Q!5yn/mz var51Tes
37、ting软件测试网mKL,h*P51Testing软件测试网9zz1j5rN-t#*B#w S, A: String;!I2hl3MSi051Testing软件测试网1X D*Q+y8a7Q&bi beginPlv Q-|,n!y&u051Testing软件测试网$fi(B%uHY.p S := abc;51Testing软件测试网 ?n !E9GBe Z!oCNUin cOEq0 A := UpperCase(S); / 经过UpperCase函数转换后，A则等于ABC。%q Ntd-|c3z0 H#PwH.Tcf+B0end;51Testing软件测试网 t&M$wO#4三、文件、磁盘操作
38、函数0l+v%dm-N r0软件大多都要对文件、磁盘进行操作。熟悉掌握这些函数可以帮助你轻松实现创建、删除、保存文件等功能。Qp4N#l%_dU0 1.Append51Testing软件测试网GpLj z 功能说明：追加内容到文件中。文件必须要存在。51Testing软件测试网u;x&M?/YHeO51Testing软件测试网j T*R|?+O4e( 参考实例：51Testing软件测试网o/s?|9e51Testing软件测试网BrS_X8uti1 var51Testing软件测试网onAzmol0i51Testing软件测试网._vbb+b S: String;c.AA$_1P4xFo05
39、1Testing软件测试网*d%B-n.J4O7A6K.e F: TextFile; B;ww?)z4bW0 &h|(SNx0begin,v R8s3$051Testing软件测试网Za1gHz9kX S := This is a book.;3Q U7mW051Testing软件测试网os&G:im AssignFile(F, C:MyFile.txt); / 将C:MyFile.txt文件与F变量建立连接，后面可以使用F变量对文件进行操作。$qy W6cQ9q p051Testing软件测试网e:it0.bKl Append(F); / 以追加的方式打开文件p&IOx$T:c6Ho0 &1OU1,O/bJ4_0 Writeln(F, S); / 将S变量中的内容追加到文本尾后。51Testing软件测试网t(Y:MJG,L!nw51Testing软件测试网*Fs:|2gyC1| CloseFile(F); / 关闭文件r_dcb(d.ze051Testing软件测试网t4w P AO80? D en