掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
パスワードの入力チェック方法 (ID：8078)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
使用可能文字列の中の「！」は半角ですよね？ function IsGoodMojiretsu(const s: string):Boolean; const OKMoji=['a'..'z']+['A'..'Z']+['0'..'9']+'!#$%^&*+-.|'; var i: Integer; begin Result := True; for i:=1 to Length(s) do begin Result := s[i] in OKMoji; if not Result then exit; end; end; procedure TForm1.Button6Click(Sender: TObject); begin if IsGoodMojiretsu(Memo2.Text) then ShowMessage('使用可能な文字列です') else ShowMessage('使用不可能な文字が含まれています。'); end; 改良の余地あるヵも…
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.