記事一覧

ランキング登録しています
ご迷惑じゃなければボタンを押してくださいm(_ _)m
にほんブログ村 アウトドアブログ 登山へ
にほんブログ村 人気ブログランキングへ

スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

メモ帳 Delphi7  文字列が数値か判定する関数

入力された情報が
数値かどうかチェックしたい時にこの2つの関数を利用します。


StrToIntDef
TryStrToInt ←Dlephi6以降対応


サンプル1
uses SysUtils

var
intdesu: Integer;
begin
//test.Text内が数値ならtest.Textの内容が、数値じゃない場合は0が入ります。
//デフォルト数値(0)は変更可能
intdesu := StrToIntDef(test.Text, 0);
if intdesu <> 0 then begin
//数値が入っていました。
end else begin
//数値じゃない or 0が入っていました。
end;
end;



サンプル2
uses SysUtils

var
intdesu: Integer;
begin
//数値の場合はTrueが返ってくるため処理を継続。
//intdesuに数値が返ってきています。
//この関数を使用すれば判定 & 変換が同時に可能
if not TryStrToInt(test.Text, intdesu) then begin
//数値が入っていました。
end else begin
//数値じゃない値入力されている
end;
end;


後は自分で使用したい関数を作成するのもありです。
個人的にはDelphi6以降でしたら、
TryStrToIntの方が使い勝手が良いです。



スポンサーサイト

コメント

コメントの投稿

非公開コメント

プロフィール

のん

Author:のん
嫁と結婚して4年半・・・
女?? 嫁以外興味なし♪
嫁大好きっす!!!!!!!

その他登山も開始。
登山初めて約2年。
まだまだ初心者ではありますが、
宜しくお願いします♪

リンク、ブロとも大募集です。
こちらも揃って宜しくお願いします★

マイプロテインの紹介コードになります。
VKLZ-R1
これを使えば購入時に割引が利きますので
もし良ければ使って下さい^^

最新トラックバック

カテゴリ

C# (5)

訪問者数


上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。