SpinEditのEcovertErrorの回避方法 (ID:39192)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 デバッグ環境も含めてエラーを出したくなかったら、 ソースのsamplesフォルダからspin.pasをコピーして以下を書き換え。 function TSpinEdit.GetValue: LongInt; begin try // Result := StrToInt (Text); // この部分を Result := StrToIntDef(Text, FMinValue); // 書き換える except Result := FMinValue; end; end;