D6パーソナル+XP
ひらがな、カタカナ混在のテープルがあり、その中から指定した文字列を検索したいのですが、指定文字列もひらがなであったりカタカナであったりするのに対応したものにしたいと思います。 VBでOption Comare Textを使った場合は’あいうえお’と指定すれば’アイウエオ’も’アイウエオ’も検索に引っかかります。 DELPHIでもこのような仕様で作りたいと思いますがどのようにしたら良いかアドバイスをお願いします。
UPされた質問を見たらカタカナが全部2バイトになっていましたので題名を変更したいと思います。
題名=’ひらがな、1バイトのカタカナ、2バイトのカタカナを区別しないで検索’
下記を参考にされて検索対象のお題の文字列を半角カタカナに変換された後
で検索されては。
全角カタカナを半角カタカナに変換する方法
https://www.petitmonte.com/bbs/answers?question_id=5858
http://delfusa.main.jp/delfusafloor/opensource/delfusalibrary/20070828160200/StringUnit/StringUnitLight.pas.txt
変換関数は
このあたりにいろいろ書いた覚えがあります。
ご参考に。
TS様 大変的確なサイトを紹介していただきありがとうございました。
https://www.petitmonte.com/bbs/answers?question_id=5858 を参考にひらがなから全角カタカナ、全角カタカナから半角カタカナ、全角カタカナから半角カタカナへのProcedureを作って実験した結果、変換がうまくいくことを確認できました。現在実装中です。
VBのOption Compare Textみたいな機能がないため少々長めなコードを書かねばなりませんが、キーワードをどんな文字形式で指定してもマッチするという所期の機能が達成できました。 ありがとうございました。