字符串处理例程:delphi编程

CompareText函数用于比较两个不区分大小写的字符串。...

CompareText函数用于比较两个不区分大小写的字符串。

man at laptop

声明:函数CompareText(常量S1,S2:string):整数;

描述:比较两个不区分大小写的字符串。

该比较不是区分大小写的,并且不考虑Windows区域设置。如果S1小于S2,则返回整数值小于0;如果S1等于S2,则返回整数值小于0;如果S1大于S2,则返回整数值大于0。

此函数已过时,即不应在新代码中使用-仅为向后兼容而存在。

例子:

var s1,s2 : string; i : integer; s1:='Delphi'; s2:='Programming'; i:= CompareText(s1,s2); //i

复制功能

返回动态数组的字符串或段的子字符串。

声明:函数副本;索引,计数:整数:字符串;函数副本;索引,计数:整数):数组;

描述:返回字符串或动态数组段的子字符串。S是字符串或动态数组类型的表达式。索引和计数是整数类型的表达式。Copy从包含从S[Index]开始的计数元素的字符串或子数组中返回包含指定数量字符的字符串。

如果索引大于S的长度,则Copy将返回长度为零的字符串(“”)或空数组。如果Count指定的字符或数组元素多于可用的字符或数组元素,则只返回从S[Index]到S结尾的字符或元素。

要确定字符串中的字符数,请使用Length函数。从起始索引复制S的所有元素的一种方便方法是使用MaxInt作为计数。

例子:

var s : string; s:='DELPHI'; s := Copy(s,2,3); //s='ELP';

删除程序

从字符串中删除子字符串。

声明:过程删除(var S:string;Index,Count:Integer)

描述:从字符串S中删除计数字符,从索引开始。如果索引不是正数或大于索引后的字符数,Delphi将保持字符串不变。如果计数大于索引后的其余字符,则删除字符串的其余部分。

例子:

var s : string; s:='DELPHI'; Delete(s,3,1) //s=DEPHI;

提取字符串函数

用从分隔列表中解析的子字符串填充字符串列表。

声明:类型TSysCharSet=字符集;函数提取器字符串(分隔符,空格:TSysCharSet;内容:PChar;字符串:TStrings):整数;

描述:使用从分隔列表解析的子字符串填充字符串列表。

分隔符是用作分隔符的一组字符,用于分隔子字符串,其中回车符、换行符和引号字符(单引号或双引号)始终被视为分隔符。空白是一组在解析内容时忽略的字符,如果它们出现在字符串的开头。Content是要解析为子字符串的以null结尾的字符串。字符串是一个字符串列表,从内容解析的所有子字符串都添加到该列表中。函数返回添加到strings参数的字符串数。

例子:

//example 1 - requires TMemo named "Memo1" ExtractStrings([';',','], [' '], 'about: delphi; pascal, programming ', memo1.Lines); //would result in 3 strings added to memo: //about: delphi //pascal //programming //example 2 ExtractStrings([DateSeparator], [' '], PChar(DateToStr(Now)), memo1.Lines); //would result in 3 strings: day month and year of the currnet date //for example '06', '25' ,'2003'

leftstr函数

返回一个字符串,该字符串包含字符串左侧指定数量的字符。

声明:函数LeftStr(常量AString:AnsiString;常量Count:Integer):AnsiString;超载;函数LeftStr(常量AString:WideString;常量Count:Integer):WideString;超载;

描述:返回一个字符串,该字符串包含字符串左侧指定数量的字符。

AString表示从中返回最左侧字符的字符串表达式。计数指示要返回的字符数。如果为0,则返回长度为零的字符串(“”)。如果大于或等于AString中的字符数,则返回整个字符串。

例子:

var s : string; s := 'ABOUT DELPHI PROGRAMMING'; s := LeftStr(s,5); // s = 'ABOUT'

长度函数

返回一个整数,该整数包含字符串中的字符数或数组中的元素数。

描述:函数长度(常数S:string):整数函数长度(常数S:array):整数

声明:返回一个整数,该整数包含字符串中的字符数或数组中的元素数。对于数组,Length(S)始终返回Ord(High(S))-Ord(Low(S))+1

例子:

var s : string; i : integer; s:='DELPHI'; i := Length(s); //i=6;

小写函数

返回已转换为小写的字符串。

Description:函数小写(const S:string):string;

声明:返回已转换为小写的字符串。小写仅将大写字母转换为小写字母;所有小写字母和非字母字符保持不变。

例子:

var s : string; s:='DeLpHi'; s := LowerCase(s); //s='delphi';

pos功能

返回一个整数,指定一个字符串在另一个字符串中第一次出现的位置。

声明:函数Pos(Str,Source:string):整数;

描述:返回一个整数,指定一个字符串在另一个字符串中第一次出现的位置。

Pos查找源中第一个完整的Str。如果它找到一个,则返回Str中第一个字符在源中的字符位置作为整数值,否则返回0。Pos区分大小写。

例子:

var s : string; i : integer; s:='DELPHI PROGRAMMING'; i:=Pos('HI PR',s); //i=5;

posex函数

返回一个整数,指定一个字符串在另一个字符串中第一次出现的位置,其中搜索从指定位置开始。

声明:函数PosEx(Str,Source:string,StartFrom:cardinal=1):整数;

描述:返回一个整数,指定一个字符串在另一个字符串中第一次出现的位置,其中搜索从指定位置开始。

PosEx在源代码中查找第一个完整的Str,从StartFrom开始搜索。如果找到一个,它将返回Str中第一个字符在源中的字符位置作为整数值,否则返回0。如果StartFrom大于Length(Source)或StartPos小于0,则PosEx也返回0

例子:

var s : string; i : integer; s:='DELPHI PROGRAMMING'; i:=PosEx('HI PR', s, 4); //i=1;

quotedstr函数

返回字符串的引用版本。

声明:函数QuotedStr(const S:string):string;

描述:返回字符串的引用版本。

将在字符串S的开头和结尾插入一个单引号字符('),并重复字符串中的每个单引号字符。

例子:

var s : string; s:='Delphi''s Pascal'; //ShowMessage returns Delphi's Pascal s := QuotedStr(s); //ShowMessage returns 'Delphi''s Pascal'

反向限制功能

返回指定字符串的字符顺序颠倒的字符串。

声明:函数反向限制(const-AString:string):string;

描述:返回指定字符串的字符顺序颠倒的字符串

例子:

var s : string; s:='ABOUT DELPHI PROGRAMMING'; s:=ReverseString(s); //s='GNIMMARGORP IHPLED TUOBA'

rightstr函数

返回一个字符串,该字符串包含字符串右侧指定数量的字符。

声明:函数RightStr(常量AString:AnsiString;常量Count:Integer):AnsiString;超载;函数RightStr(常量AString:WideString;常量Count:Integer):WideString;超载;

描述:返回一个字符串,该字符串包含字符串右侧指定数量的字符。

AString表示从中返回最右边字符的字符串表达式。计数指示要返回的字符数。如果大于或等于AString中的字符数,则返回整个字符串。

例子:

var s : string; s := 'ABOUT DELPHI PROGRAMMING'; s := RightStr(s,5); // s = 'MMING'

stringreplace函数

返回一个字符串,其中指定的子字符串已替换为另一个子字符串。

声明:类型TReplaceFlags=set of(rfReplaceAll,rfIgnoreCase);

函数StringReplace(const S,OldStr,NewStr:string;Flags:TReplaceFlags):string;

描述:返回一个字符串,其中指定的子字符串已替换为另一个子字符串。

如果Flags参数不包括rfReplaceAll,则只替换S中第一个出现的OldStr。否则,OldStr的所有实例都将替换为NewStr。如果Flags参数包括rfIgnoreCase,则比较操作不区分大小写。

例子:

var s : string; s:='VB programmers love About VB Programming site'; s := ReplaceStr(s,'VB','Delphi', [rfReplaceAll]); //s='Delphi programmers love About Delphi Programming site';

修剪功能

返回一个字符串,该字符串包含指定字符串的副本,且不包含前导和尾随空格以及控制字符。

声明:函数Trim(const S:string):string;

描述:返回包含指定字符串副本的字符串,该字符串不包含前导和尾随空格以及非打印控制字符。

例子:

var s : string; s:=' Delphi '; s := Trim(s); //s='Delphi';

大写函数

返回已转换为大写的字符串。

声明:函数大写(const S:string):string;

描述:返回已转换为大写的字符串。大写仅将小写字母转换为大写;所有大写字母和非字母字符保持不变。

例子:

var s : string; s:='DeLpHi'; s := UpperCase(s); //s='DELPHI';

val程序

将字符串转换为数值。

声明:过程Val(常量S:字符串;var结果;var代码:整数);

描述:将字符串转换为数值。

S是字符串类型的表达式;它必须是构成有符号实数的字符序列。结果参数可以是整数或浮点变量。如果转换成功,则代码为零。如果字符串无效,则有问题字符的索引将存储在代码中。

Val不注意十进制分隔符的本地设置。

例子:

var s : string; c,i : integer; s:='1234'; Val(s,i,c); //i=1234; //c=0

  • 发表于 2021-10-05 08:32
  • 阅读 ( 172 )
  • 分类:IT

你可能感兴趣的文章

delphi编译器版本指令

...的)。 例如,Delphi 5中引入的IncludeTrailingBackslax函数在字符串的末尾添加“\”,如果该字符串还不存在。在Delphi MP3项目中,我使用了这个函数,有几位读者抱怨说他们不能编译这个项目,因为他们在Delphi 5之前有一些Delphi版本...

  • 发布于 2021-09-06 15:09
  • 阅读 ( 164 )

将项目添加到tpopup delphi菜单

...单项添加到菜单时分配的标记值。 tmenuitem中的自定义字符串 在实际应用程序中,您可能需要更大的灵活性。假设每个项目将“代表”一个网页-需要一个字符串值来保存网页的URL。当用户选择此项时,您可以打开默认web浏览...

  • 发布于 2021-09-06 15:10
  • 阅读 ( 167 )

了解delphi编程的基础知识

...习如何在窗体上放置组件、设置它们的属性以及编写事件处理程序以使组件协作。 德尔菲帕斯卡 在开始使用Delphi的RAD功能开发更复杂的应用程序之前,您应该学习Delphi Pascal语言的基础知识。此时,您需要开始仔细考虑代码...

  • 发布于 2021-09-06 15:13
  • 阅读 ( 186 )

德尔福单元剖析(德尔福初学者版)

...。该单元包含附加到窗体事件或其包含的组件的任何事件处理程序的源代码。 由于单元存储项目的代码,因此单元是Delphi编程的基础。一般来说,unit是常量、变量、数据类型以及可由多个应用程序共享的过程和函数的集合。 ...

  • 发布于 2021-09-10 20:53
  • 阅读 ( 183 )

用delphi和ado编辑excel表格

...ADO新手,请参阅DelphiADO数据库编程初学者课程。 连接字符串魔术 ConnectionString属性告诉ADO如何连接到数据源。ConnectionString使用的值由ADO用于建立连接的一个或多个参数组成。 在Delphi中,TADOConnection组件封装了ADO连接对象;...

  • 发布于 2021-09-11 00:21
  • 阅读 ( 244 )

理解delphi中的内存分配

...FreeMem、New和Dispose()显式分配内存。 使用ANSI/wide/Unicode字符串、变量和接口(由Delphi自动管理)。 堆内存没有很好的布局,分配内存块是有一定顺序的。堆看起来像一罐弹珠。堆中的内存分配是随机的,这里的一个块比那里...

  • 发布于 2021-09-15 03:47
  • 阅读 ( 197 )

如何用delphi搜索文件和文件夹(search for files and folders with delphi)

...Attr,文件的属性如上所述。。Name包含一个表示文件名的字符串,不包含路径信息。找到的文件的大小(字节)。。时间将文件的修改日期和时间存储为文件日期。。FindData包含其他信息,如文件创建时间、上次访问时间以及长...

  • 发布于 2021-09-15 03:52
  • 阅读 ( 214 )

如何在delphi中创建、使用和关闭表单(create, use, and close forms in delphi)

...应该使用OnCreate事件处理程序来执行初始化杂务,如分配字符串列表。 OnCreate事件中创建的任何对象都应该由OnDestroy事件释放。 OnCreate -> OnShow -> OnActivate -> OnPaint -> OnResize -> OnPaint ... OnShow此事件表示正在显示...

  • 发布于 2021-09-15 04:03
  • 阅读 ( 219 )

set checkbox.checked不带onclick事件

...anged事件,您可能会根据OnClick事件中复选框的选中状态来处理程序逻辑。 但是,如果以编程方式更改Checked属性,则将触发OnClick事件——即使没有发生用户交互。 在“禁用”OnClick事件时,有(至少)两种方法可以通过编程更...

  • 发布于 2021-09-15 04:04
  • 阅读 ( 162 )

在delphi中理解和使用记录数据类型

...用一个三维数组,但是它的类型呢?姓名和电子邮件需要字符串,上传次数需要整数。 使用这种数据结构的方法是使用Delphi的记录结构。 tmember=记录。。。 例如,下面的声明创建了一个名为TMember的记录类型,我们可以在本...

  • 发布于 2021-09-15 04:05
  • 阅读 ( 199 )
ZHAN39981
ZHAN39981

0 篇文章

相关推荐