- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Delphi XEの警告文を消したい)
Delphi XEの警告文を消す方法
このQ&Aのポイント
- Delphi XEにおいて、特定の警告文が表示される場合があります。これを解消する方法を紹介します。
- 警告文の内容は、'SysUtils' ユニットの 'CharInSet' 関数で使用することを検討するように指示しています。
- 具体的な解決方法としては、ソースコードの一部を変更することが必要です。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
CharInSetを使いましょう。 if not(key in['0'..'9','.',Char(VK_RETURN),Char(VK_BACK)]) then ↓ if not CharInSet(key, ['0'..'9','.',Char(VK_RETURN),Char(VK_BACK)]) then
お礼
お陰さまで、一発解決できました。ありがとうございました。