この発言は
#00048　H-Triton        さんの文字列が数値かどうかの判定
に対するコメントです





■説明
　例外を利用して String 型のデータが数値化可能か判定する関数です。
　関数名は H-Triton さんのものを使わせていただきました。m(_"_)m

■注意点
　位取りカンマ、通貨記号には対応していません。

■サンプルコード
//=====================================================================
function IsNumericStr( Str : string ): Boolean;
begin
  Result := True;
  try
    StrToInt( Str );   //←ここは期待する数値の型にあわせて適当に
  except On EConvertError do
    Result := False;
  end;
end;
//=====================================================================

                                     97/10/20(Mon) 02:50 Fermion [KHF03264]

Original document by Fermion         氏 ID:(KHF03264)

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。