掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
WideCharが半角か全角か判断したい (ID:21502)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんにちは。 Unicode文字(WideChar)が半角で描かれるのか全角で描かれるのかを区分けしたくて 以下のコードで取得できる HiByte=00で区別できるかと思ったのですが 半角カタカナを読み込ませたところ HiByteがFFでした Unicode文字(WideChar)が半角で描かれるのか全角で描かれるのかは HiByteが00か、FFか、で判断してよいものでしょうか？ 教えてください。よろしくお願いします。 調査のためのコードです。 procedure TForm1.Button1Click(Sender: TObject); var swork: WideString; msg: AnsiString; i: Integer; Buffer: Char; begin // WideStringの内容をチェック swork := 'ABCあいうアイウエオアイウエオ'; msg := '元の文字列=' + swork + #13#10; for i := 1 to Length(swork) do begin Buffer := Char(HiByte(word(swork[i]))); msg := msg + IntToHex(Ord(Buffer), 2) + ' '; Buffer := Char(LoByte(word(swork[i]))); msg := msg + IntToHex(Ord(Buffer), 2) + ' '; end; ShowMessage(msg); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.