[Delphi] 比較条件間違ってた…2010/07/04 00:00:00

JIS 8bit Code

Delphi で、ちまちまと自分のために書いてるツール、Z が小文字変換されてないのに気付いた

で、“不便だなぁ…” と思ったのが、すぐ見れる、テキストの文字コード表 (JIS 8bit で十分) を用意してない事… (^^;; (こう言う文字列を扱うプログラムの時に便利)

ああ、不具合の方は、単純に、比較条件間違えて書いてただけでした

良くあるバグです (ォィ

 

手入力だとミスする可能性もあるし、この程度のバイナリを出力させるコードは単純なので、HSP でベースを出力させて、それを編集

 

 
sz = 18 * 14 : sdim s,sz;
i = 0 : c = $20;
repeat 14;
  repeat 16;
    poke s,i,c : i++ : c++;
  loop;
  poke s,i,$0d : i++ : poke s,i,$0a : i++;
loop;
bsave "SJIS_CHR.TXT",s,sz : end;

 

実用重視の汚いコードですな… (^^; (コピー&ペーストすると、2バイトスペースが入ってるのでエラーが出る)

 

他にも、“文字コード表” を起動するとか、“ATOK 文字パレット” を開くって方法もありますが…

ATOK 文字パレット

起動が遅かったり (文字コード表)、余り見易くない (双方とも, 文字コード表は最悪レベル) のが難点かなぁ…