知识大全字符串的相关判断[2]

Posted 2022-07-22 知

篇首语：你对时间的态度，就是你对仅有一次生命的态度。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全字符串的相关判断[2]相关的知识，希望对你有一定的参考价值。

Delphi开发技巧：字符串的相关判断[2] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

——此文章摘自《Delphi开发经验技巧宝典》定价￥　特价￥购买>>//track linktech cn/?m_id=dangdang&a_id=A &l= &l_type = width= height= border= nosave>

主要代码如下 procedure TForm Button Click(Sender: TObject); var Isstr : String; begin Isstr := Edit Text; try StrToInt(Isstr); ShowMessage( 由数字组成！ ); except if Isstr=Uppercase(Isstr) then ShowMessage( 由大写字母组成！ ) else if Isstr=Lowercase(Isstr) then ShowMessage( 由小写字母组成！ ) else ShowMessage( 无法识别可能是混杂型 ) end; end;

字符串中的某一字符是否大写

本实例先用Ansiuppercase()函数将要查找的字符串转换成大写然后用AnsiMidstr()函数在字符串中进行查找运行结果如图所示

//develop csai cn/delphi/images/ jpg >图判断字符串中的某一字符是否大写

主要代码如下 procedure TForm Button Click(Sender: TObject); var s x:String; i:Integer; begin s:=Ansiuppercase(Trim(Edit Text)); for i:= to Length(Trim(Edit Text)) do begin if Ansiuppercase(Trim(Edit Text))=AnsiMidstr(trim(Edit Text) i ) then begin Label Caption:= 有 ; break; end else Label Caption:= 没有 ; end; end;

cha138/Article/program/Delphi/201311/8468

知识大全 字符串的相关判断[2]

知识大全字符串的相关判断[2]