delphi 判斷字符串是否為純數(shù)字組合

更新時(shí)間：2022年12月24日 21:54:35 投稿：mdxy-dxy

這篇文章主要介紹了delphi 判斷字符串是否為純數(shù)字組合,需要的朋友可以參考下

核心代碼

function IsNUM(Vaule:String):boolean; //delphi 判斷字符串是否為純數(shù)字組合
var
i:integer;
begin
Vaule:=trim(Vaule); //去空格知
for i:=1 to length(Vaule) do //準(zhǔn)備循環(huán)
begin
if ( Vaule[i] in ['0'..'9'])  then //如果Vaule的第i個(gè)字不道是A-Z或者a-z中的任一個(gè)回
begin
result:=true; //返回值 不是
end
else
begin
result:=false; //設(shè)置返度回值為 是
exit;
end;
end;
end;

代碼二

function   IsNum(str:   string):   Boolean;  
  var  
      i:   Integer;  
  begin  
      Result   :=   True;  
      for   i   :=   1   to   Length(str)   do  
          if   not   (str[i]   in   ['0'..'9'])   then  
          begin  
              Result   :=   False;  
              Break;  
          end;  
  end;

到此這篇關(guān)于delphi 判斷字符串是否為純數(shù)字組合的文章就介紹到這了,更多相關(guān)delphi純數(shù)字內(nèi)容請(qǐng)搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家！

相關(guān)文章

Delphi中設(shè)置條件斷點(diǎn)的方法講解
這篇文章主要介紹了Delphi中設(shè)置條件斷點(diǎn)的方法，有需要的朋友可以參考一下
2014-01-01
Delphi7中群發(fā)Email郵件的方法
這篇文章主要介紹了Delphi7中群發(fā)Email郵件的方法,涉及郵件服務(wù)器軟件的使用,電子郵件的判斷與發(fā)送功能的實(shí)現(xiàn),是非常實(shí)用的技巧,需要的朋友可以參考下
2014-12-12
Delphi使用OpenGL2d繪圖之畫圖片Bmp的方法
這篇文章主要介紹了Delphi使用OpenGL2d繪圖之畫圖片Bmp的方法,需要的朋友可以參考下
2014-07-07
Delphi遠(yuǎn)程連接Mysql的實(shí)現(xiàn)方法
這篇文章主要介紹了Delphi遠(yuǎn)程連接Mysql的實(shí)現(xiàn)方法,需要的朋友可以參考下
2014-09-09
Delphi實(shí)現(xiàn)木馬自我拷貝方法
這篇文章主要介紹了Delphi實(shí)現(xiàn)木馬自我拷貝方法,對(duì)于研究木馬的運(yùn)行原理很有幫助,需要的朋友可以參考下
2014-07-07
插件管理框架 for Delphi（二）
插件管理框架2.2 實(shí)現(xiàn)代碼
2008-03-03
在Delphi實(shí)現(xiàn)在數(shù)據(jù)庫中存取圖像的圖文演示無錯(cuò)
最近打算學(xué)習(xí)Delphi實(shí)現(xiàn)在數(shù)據(jù)庫中存取圖像,網(wǎng)上的好多Delphi實(shí)現(xiàn)在數(shù)據(jù)庫中存取圖像都是錯(cuò)誤的，所以我把圖片給弄好了。
2008-01-01
Delphi實(shí)現(xiàn)判斷網(wǎng)址是否存在及是否可以打開的方法
這篇文章主要介紹了Delphi實(shí)現(xiàn)判斷網(wǎng)址是否存在及是否可以打開的方法,需要的朋友可以參考下
2014-07-07
Delphi編程常用快捷鍵大全
這篇文章主要介紹了Delphi編程常用快捷鍵,對(duì)于提高Delphi編程的效率很有幫助,需要的朋友可以參考下
2014-07-07
c# 多線程編程入門篇
多線程應(yīng)該是編程工作者的基礎(chǔ)技能, 但這個(gè)基礎(chǔ)對(duì)我來講的確有點(diǎn)難(起碼昨天以前是這樣).
2009-04-04