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í)現(xiàn)獲取進(jìn)程列表及相關(guān)信息的實(shí)例
這篇文章主要介紹了Delphi實(shí)現(xiàn)獲取進(jìn)程列表及相關(guān)信息的實(shí)例,希望通過(guò)本文大家能實(shí)現(xiàn)這樣的功能,需要的朋友可以參考下2017-09-09截取指定符號(hào)之間的字符串(隨機(jī)讀取)delphi實(shí)例代碼
這篇文章主要介紹了截取指定符號(hào)之間的字符串(隨機(jī)讀取)delphi實(shí)例代碼,有需要的朋友可以參考一下2013-12-12Delphi 在窗體上創(chuàng)建自己光標(biāo)的實(shí)例
這篇文章主要介紹了Delphi 在窗體上創(chuàng)建自己光標(biāo)的實(shí)例的相關(guān)資料,希望通過(guò)本文能幫助到大家,需要的朋友可以參考下2017-09-09Delphi創(chuàng)建開(kāi)機(jī)啟動(dòng)項(xiàng)的方法示例
這篇文章主要介紹了Delphi創(chuàng)建開(kāi)機(jī)啟動(dòng)項(xiàng)的方法,很有實(shí)用價(jià)值,需要的朋友可以參考下2014-07-07Delphi實(shí)現(xiàn)圖片滾動(dòng)切換的完整實(shí)例代碼
這篇文章主要介紹了Delphi實(shí)現(xiàn)圖片滾動(dòng)切換的完整實(shí)例代碼,通過(guò)本實(shí)例,讀者可以進(jìn)一步掌握Delphi控件及圖形處理的技巧,需要的朋友可以參考下2014-07-07Delphi實(shí)現(xiàn)判斷網(wǎng)址是否存在及是否可以打開(kāi)的方法
這篇文章主要介紹了Delphi實(shí)現(xiàn)判斷網(wǎng)址是否存在及是否可以打開(kāi)的方法,需要的朋友可以參考下2014-07-07