みんなに優しく、解りやすくをモットーに開設しています。 以下のルールを守りみんなで助け合いましょう。
1.ファイルメーカーで解らない事があればここで質問して下さい。 何方でも、ご質問・ご回答お願いします。 （優しく回答しましょう）
You are not logged in.
Pages: 1
Windows 10, Version １９です。
テキストフィールド内に全角文字ではない文字が含まれると警告メッセージを出したくて、
Chatで答えが出るアプリで下記のようなスクリプトが出たので試したところ、全角以外の文字があっても、うまく警告がでません。
お手数ですが、機能する計算式をご教示して頂けませんでしょうか、、宜しくお願い致します。
Set Variable [ $fieldContent; YourTable::YourField ] // フィールドの内容を変数に格納
# 全角文字以外の文字が含まれているかを正規表現で検出
If [ PatternCount ( $fieldContent ; "[^\x{FF61}-\x{FF9F}]" ) > 0 ]
Show Custom Dialog [ "警告" ; "フィールドに全角文字以外の文字が含まれています。" ]
End If
Offline
最近はやりのしったかAIですか。
PatternCountに正規表現は使えません。
条件としては「半角文字を含まない」、でいいんですか？
FMはUnicodeなので半角とも全角ともいえない文字が大多数です。
Exact ( RomanZenkaku ( KanaZenkaku ( フィールド ) ) ; フィールド )
これが0を返せば半角を含んでいますね。
Offline
チポ様、サンプルありがとうございます！
設定して警告メッセージを表示させることができました。
Last edited by tycobb (2023-09-14 17:48:58)
Offline
Pages: 1
[ Generated in 0.008 seconds, 9 queries executed - Memory usage: 549.5 KiB (Peak: 581.48 KiB) ]