资源预览内容
第1页 / 共35页
第2页 / 共35页
第3页 / 共35页
第4页 / 共35页
第5页 / 共35页
第6页 / 共35页
第7页 / 共35页
第8页 / 共35页
第9页 / 共35页
第10页 / 共35页
亲,该文档总共35页,到这儿已超出免费预览范围,如果喜欢就下载吧!
资源描述
一、数据类型转换函数 1在我们编写程序当中,根据不同情况,会使用到多种数据类型。当要对不同的类型进行操作时,必须要将不同的类型转换成同样的类型。因此熟练地掌握数据类型的转换是非常重要的。1.FloatToStr功能说明:该函数用于将“浮点型”转换成“字符型” 。参考实例:Edit1.Text := FloatToStr(1.981);2.IntToStr功能说明:该函数用于将“整数型”转换成“字符型” 。参考实例:S := IntToStr(10);(注:S 为 String 类型变量。)3.IntToHe能说明:该函数用于将“十进制”转换成“十进制” 。该函数有二个参数 1。第一个参数为要转换的十进制数据,第二个参数是指定使用多少位来显示十六进制数据。参考实例:Edit1.Text := IntToHex(100, 2);执行结果,Edit1.Text 等于 64。注意:Delphi 没有提供专门的“十六进制”转换为“十进制”的函数。使用 StrToInt 函数可以实现这个功能。具体代码是:I := StrToInt(S + 64); 这时 I 等于 100。加上一个S即可将“十六进制”转换为“十进制” 。4.StrToInt功能说明:该函数用于将“字符型”转换成“整数型” 。参考实例:I := StrToInt(100);注意:不能转换如 StrToInt(ab)或StrToInt(好)这样的类型,因为他们并不存在数字型。5.StrToFloat功能说明:该函数用于将“字符型”转换成“浮点型” 。参考实例:N := StrToFloat(Edit1.Text);注意:Edit1.Text 中的内容为 1.981(凡在 Edit控件中显示的文本均为字符串)。N 为 Double 类型,用于保存转换后的浮点型数据。二、字符串、数组操作函数对字符串及数组的操作,是每个程序员必须要掌握的。熟练的使用这些函数,在编程时能更加得心应手。1.Copy功能说明:该函数用于从字符串中复制指定范围中的字符。该函数有 3 个参数。第一个参数是数据源(即被复制的字符串),第二个参数是从字符串某一处开始复制,第三个参数是要复制字符串的长度(即个数)。最后函数返回一个新的字符串(即是我们指定要复制的字符串内容)。参考实例:varS: String;MyStr: String; / 保存新的字符串beginS := I Love China!;/下面将获取 I Love China 中的“Love”字符串。MyStr := Copy(S, 3, 4);end;执行结果,MyStr 等于“Love” , “Love”字符串在“I Love China!”中第 3 个位置开始,所以第二个参数为 3, “Love”一共有 4 个字符,所以第三个参数为 4。2.Concat功能说明:连接两个或多个字符串为一个字符串。参考实例:varS1, S2: String;beginS1 := Concat(A, B); / 连接两个字符串,S1 变量等于 AB。S2 := Concat(Borland, Delphi, 7.0); / 连接三个字符,S2 变量等于 Borland Delphi 7.0。end;3.Delete功能说明:删除字符串中指定的字符串。该函数有三个参数。第一个参数为要进行处理的字符串,第二个参数为从何处开始删除,第三个参数为删除的字符个数。参考实例:varS: String;beginS := I Like Reading CPCW.;/ 下面的代码将删除 S 变量中的“C”字符。Delete(S, 16, 1);end;此时 S 变量则是 I Like Reading PCW.(“C”已经不存在了)。4.High功能说明:返回数组下标的最大值。参考实例:vararrText: array0.9 of Char;i: Integer;begini := High(arrText); / i 的值则为 9end;5.Insert功能说明:插入一个字符(串)。该函数有三个参数。第一个参数为要插入的字符(串),第二个参数为被插入字符串(源字符串),第三个参数为从何处插入。参考实例:varS: String;beginS := Wat is your name?;/ 上面句子中的 What 单词查一个“h”字符,下面使用 Insert 函数将 h 添加进去。Insert(h, S, 2); / 将“h”从第 2 位处插入。end;6.LeftStr(所在单元:StrUtils)功能说明:返回字符串左边指定个数的新字符(串)。该函数有两个参数。第一个参数为完整的字符串,第二个参数为指定个数。参考实例:varS, A: String;beginS := MSN Messenger;A := LeftStr(S, 3); / 从最左边开始,获取左边的三个字符。因此 A 变量则等于 MSN。end;7.Length功能说明:该函数用于统计指定字符串的长度(即个数)。参考实例:varnLen1, nLen2: Integer; / 用于保存字符串长度beginnLen1 := Length(CPCW);nLen2 := Length(电脑报);end;执行结果,nLen1 等于 4,nLen2 等于 6。由于一个汉字相当于两个字符的长度,所以 3 个汉字的长度为 6。8.Low功能说明:返回数组下标的最小值。参考实例:vararrText: array1.9 of Char;i: Integer;begini:= High(arrText); / i 的值则为 1end;9.LowerCase功能说明:将字符(串)中的英文字符转换为小写。参考实例:varS, A: String;beginS := ABC;A := UpperCase(S); / 经过 UpperCase 函数转换后,A 则等于 abc。end;10.MidStr(所在单元:StrUtils)功能说明:返回指定范围内的字符串。该函数有三个参数。第一个参数为源字符串,第二个参数为起点,第三个参数为结束点。通过第二、第三个参数则可指定要复制字符串的范围。Copy 函数与此函数类似。MidStr 主要用于处理含有中文字符的字符串。参考实例:varS: String;H: String;beginS := MidStr(China, 1, 2); / S 变量为ChH := MidStr(电脑报, 1, 1); / H 变量为“电” 。如果使用 Copy 函数,则应是 H := Copy(电脑报, 1, 2),否则返回的将不是“电”字。因此在使用操作含有中文的字符串时,最好使用MidStr。end;11.Pos功能说明:查找字符(串)所在位置。该函数有二个参数。第一个参数为要查找的字符(串),第二个参数为被查找字符(串)。参考实例:varnPos: Integer; / 用于保存查找的字符所在位置beginnPos := Pos(Like, I Like Reading!);end;此时 nPos 等于 3。如果没有查找到,则 nPos 为0。注意:Pos 函数在查找时是要区分字符大小的。如果要实现不区分大小,那么需要使用 UpperCase或 LowerCase 函数将两个参数的字符(串)转换为“大写”或“小写”再进行查找。另外还有一个查找字符(串)的函数-AnsiPos,该函数的使用方法与 Pos 函数完全一样。当你查找的是汉字时,最好使用 AnsiPos 函数。12.RightStr(所在单元:StrUtils)功能说明:返回字符串右边指定个数的新字符(串)。该函数有两个参数。第一个参数为完整的字符串,第二个参数为指定个数。参考实例:varS, A: String;beginS := MSN Messenger;A := RightStr(S, 3); / 从最右边开始,获取右边的三个字符。因此 A 变量则等于 ger。end;13.SetLength功能说明:设置字符串或动态数组长度。该函数有两个参数。第一个参数为要设置的字符串变量或动态数组变量,第二个参数为指定的长度,其取值范围在 0 到 255 之间。参考实例:varS: String;arrText: array of Char; / 定义一个动态数组beginSetLength(S, 10); / 当设置后,S 变量只能赋值长度为 10 的字符串。SetLength(arrText, 10); / 只有使用SetLength 为动态数组分配内存空间后才能使用动态数组。这句代码的作用相当于 arrText: array0.9 of Charend;14.StrPCopy功能说明:将字符串复制到字符数组中。该函数有两个参数。第一个参数为“目标数组” ,第二个参数为“字符串” 。参考实例:vararrChar: array0.255 of Char; / 这里声明了长度为 256 的 Char 型数组beginStrPCopy(arrChar, Come on, baby!);end;15.Trim功能说明:删除字符串左右两边的空格(无论左右两边有多少个空格均被全部删除)。参考实例:varS: String;beginS := Delphi 7.0 ;S := Trim(S);end;16.TrimLeft功能说明:删除字符串左边的空格(无论左边有多少个空格均被全部删除)。参考实例:S := TrimLeft( Delphi);17.TrimRight功能说明:删除字符串左边的空格(无论左边有多少个空格均被全部删除)。参考实例:S := TrimRight(Delphi );18.UpperCase功能说明:将字符(串)中的英文字符转换为大写。参考实例:varS, A: String;beginS := abc;A := UpperCase(S); / 经过 UpperCase 函数转换后,A 则等于 ABC。end;三、文件、磁盘操作函数软件大多都要对文件、磁盘进行操作。熟悉掌握这些函数可以帮助你轻松实现创建、删除、保存文件等功能。1.Append功能说明:追加内容到文件中。文件必须要存在。参考实例:varS: String;F: TextFile;beginS := This is a book.;AssignFile(F, C:MyFile.txt); / 将C:MyFile.txt 文件与 F 变量建立连接,后面可以使用 F 变量对文件进行操作。Append(F); / 以追加的方式打开文件Writeln(F, S); / 将 S 变量中的内容追加到文本尾后。CloseFile(F); / 关闭文件end;2.AssignFile功能说明:与指定的文件建立连接。参考实例:varF: TextFile; / 声明文本文件类型变量beginAssignFile(F, C:MyFile.txt); / 将C:MyFile.txt 文件与 F 变量建立连接,后面可以使用 F 变量对文件进行操作。end;3.ChDir功能说明:改变当前目录(文件夹)。参考实例:varsDir: String;beginsDir := C:Windows;ChDir(sDir); / 此时,系统的当前目录则为 C:Windows 目录。end;4.CloseFile功能说明:关闭文件。当对文件的操作完成后,应该使用 CloseFile 函数关闭打开的文件。参考实例:varS: String;AllText: String;F: TextFile;beginAssignFile(F, C:MyFi
网站客服QQ:2055934822
金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号