掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TEditの数字入力桁数を指定 (ID:4910)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
オブジェクトインスペクタでの設定は無理です。 TEditのイベントで下記を入力すれば数値のみになります。 procedure TForm1.EditFromKeyPress(Sender: TObject; var Key: Char); var AcceptStr:string; begin AcceptStr := '0123456789'; if (Pos(Key,AcceptStr)=0) and (Ord(Key) <> VK_BACK) then Key := #00 else Key := Key; end; 後者の質問に関しては算術関数を使用することで可能になると思います。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.