var S:string;
IntI:integer;
-----
IntI:=StrToInt(S) において S が有効な数値を表していない場合,例外を生成しますので、
この例外を避けるために、前もって if〜then で S が数値化可能であるかを検証しようとしています。
この「S が数値化可能であるか」はどのようにコーディングするのでしょうか?
i := StrToIntDef(S,-1);
if i <> -1 then Exit;
こんな感じでしょうか?
Val手続きではどうでしょうか?
迅速なる御教示をありがとうございます。
やはり便利な関数や手続きがあったんですね。
視野狭窄に陥っていました(^^;。
今回はStrToIntDefで簡潔なコードがかけました。
Val手続きに関しても勉強するきっかけを下さいましたことに感謝いたします。
ツイート | ![]() |