SysUtils.CompareStr、SysUtils.CompareText

为什么80%的码农都做不了架构师？>>>

CompareStr 区分大小写; CompareText 不区分大小写. 举例:

vars1,s2: string;i: Integer;
begins1 := 'abc';s2 := 'adc';i := CompareStr(s1,s2);ShowMessage(IntToStr(i));  {-2}i := CompareText(s1,s2);ShowMessage(IntToStr(i));  {-2}s1 := 'abc';s2 := 'ABC';i := CompareStr(s1,s2);    {CompareStr 区分大小写}ShowMessage(IntToStr(i));  {32}i := CompareText(s1,s2);   {CompareText 不区分大小写}ShowMessage(IntToStr(i));  {0}
end;

SysUtils 单元下的公用函数目录

转载于:https://my.oschina.net/hermer/blog/319992

SysUtils.CompareStr、SysUtils.CompareText - 字符串比较相关推荐

Delphi 中的字符串函数(5) - SysUtils 中的 Ansi 字符串函数
//对比字符串是不是一样: AnsiSameStr.AnsiSameText varss,s: AnsiString;b: Boolean; beginss := 'abc';s := 'ABC';b ...
Delphi7函数大全
首部 function Languages: TLanguages; $[SysUtils.pas 功能返回系统语言对象说明通过此函数可以得到系统的语言环境参考 type SysUti ...
Delphi procedure and function
[标准函数和过程] 首部 procedure Abort;$[SysUtils 功能引起放弃的意外处理. 说明不显示任何错误信息. 首部 function Abs(N: ): ;$[System ...
博客总目录(2007.11.12 - 2010.4.25)
如果我的学习记录和历程能对你有所帮助, 我非常高兴; 但是 -- "万一" 不是高手.更不是大师, 只是利用工作之余学点东西, 并感觉学得挺吃力. 内容都是写时才会, 难免稚嫩, ...
Delphi 函数大全
名称类型说明 abort 函数引起放弃的意外处理 abs 函数绝对值函数 addexitproc 函数将一过程添加到运行时库的结束过程表中 addr 函数返回指定对象的地址 ...
Delphi函数大全
Delphi函数大全首部 function Languages: TLanguages; $[SysUtils.pas 功能返回系统语言对象说明通过此函数可以得到系统的语言环境参考 ...
delphi 2006-05笔记
2006 年 5 月 8 日星期一 VCLSkin的使用 How to skin a application A. Skin file store in exe file. 1. Put TSkin ...
Delphi中文帮助[1]Delphi7的新特性
声明:本文是对borland公司delphi7在线帮助的翻译.原文版权归borland公司所有,中文翻译版权归作者所有.本文可以在不经作者授权的情况下进行转载,但必须注明作者和源出处,且不得用于商业用 ...
Delphi----心得03
98-8-23 22:00 raise的用法看Demo时学的: raise Exception.Create('Project ID is required'); 在工程文件中Application ...

SysUtils.CompareStr、SysUtils.CompareText - 字符串比较

SysUtils.CompareStr、SysUtils.CompareText - 字符串比较相关推荐

最新文章

热门文章