1樓：己聞楣
varn : integer;
f : double;
......
if trystrtoint( astring, n ) then ...... // 是整數，且存入了n
if trystrtofloat( astring, f ) then ......// 是float，且存入了f
2樓：誰_人_知
隨手寫的一段，只是簡單的判斷一下，沒有考慮資料型別的界限，可參考：
procedure tform1.button1click(sender: tobject);
vari,j : integer;
s : string;
c : char;
begin
if edit1.text <> '' thenbegin
j := 0;
s := edit1.text;
for i := 1 to length(s) dobegin
c := s[i];
if not (c in ['0'..'9','.']) thenbegin
showmessage('不是float或integer型別');
exit;
endelse
begin
if c = '.' then
inc(j);
if j > 1 then
begin
showmessage('不是float或integer型別');
exit
end;
end;
end;
showmessage('是float或integer型別');
end;
end;
3樓：匿名使用者
判斷中間是否有不是0—9的字元就可以
delphi 如何判斷一個字串是否包含漢字?
4樓：tr硪奈づ錢
//字串是否包含漢字，是返回真，否則返回假
function tform1.ifincludehz(strtxt:string):boolean;
var i:integer;
begin
//先判斷要擷取的字串最後一個位元組的型別
//如果為漢字的第一個位元組則減(加)一位
result:=false;
for i:=0 to length(strtxt) do
begin
if bytetype(strtxt,i) = mbleadbyte then
begin
result:=true;
break;
end;
end;
end;
//判斷字元是否是漢字
//如果是漢字那麼，返回 true，如果不是漢字，那麼返回 false
function ismbcschar(const ch: char): boolean;
begin
result := (bytetype(ch, 1) <> mbsinglebyte);
end;
我覺得最好還是在輸入之前判斷好一點
在delphi7中，如何在一個字串中查詢某一地位處的字元是什麼？
5樓：習仙子
1一個字串就是一個陣列var str: string;begin str := 'hello'; caption := str[2]; //顯示eend; 檢視原帖》
delphi7 怎麼判斷輸入的字串是一個實數（包
6樓：155024知道
有兩種方法：
1、在copyedit1的onkeypress事件中輸入如下bai**
if not ( key in ['0'..'9',#13,#16,#8]) then
begin
key := #0 ;
exit ;
end;
2、呼叫
dudelphi本身自帶的函式trystrtoint來執行判斷,例如在
zhiedit1的onexit事件中輸入：dao
判斷變數是不是字串型別
7樓：
gettype()用來取得變數的型別。返回的型別字串可能為下列字串其中之一：integer、double、string、array、object、unknown type
is_numeric ( mixed var ): //檢驗測定變數是不是為數碼或數碼字串
is_bool(): //檢驗測定變數是不是是布林型
is_float(): //檢驗測定變數是不是是浮點型 和is_double，is_real()都同樣的用法
is_int(): //檢驗測定變數是不是是整兒is_integer()同樣的用法
is_string(): //檢驗測定變數是不是是字串
is_object(): //檢驗測定變數是不是是一個物件
is_array(): //檢驗測定變數是不是是陣列
is_null(): //檢驗測定變數是不是為 滅茬 值是不是是滅茬鉅細寫敏感
delphi 判斷字串是否為數字
8樓：
trystrtoint(str);
b:=true;
except
b:=false;
end;
如果b=true就代表是，strtoint 是個會異常返回的函式，如果是異常退出就代表是。。。。
delphi7中怎麼把字串賦值給一維陣列急
樓主所說的數 組應該是array of byte 或者array of char這中的陣列吧。varstr string pbuf array 0.100 of char array 0.100 of byte len integer begin str abcdefg 將str的值賦給陣列pbuf...
vb中怎麼判斷字串中包含另字串
1 啟動vb新建工程1，在form1的合適位置畫出3個label框 2個text框以及1個command按鈕 可以預先對各控制元件的caption等屬性進行修改 2 雙擊 統計 即command1 按鈕，在彈出的 框中編寫如下 privatesubcommand1 click dimxasstrin...
delphi 7中陣列如何當引數
因為你在函式中傳遞的陣列的形參的型別的是tdigits。但是實參s卻不是tdigits而是array 1.8 of longint。固然實參的宣告與形參就形式上來說是一致的 都是array 1.8 of longint 但是在程式中tdigits與實參s的型別卻不能被認定為同種型別。所以自然無法通過...