投稿日 | : 2007/01/28(Sun) 11:43 |
投稿者 | : kuma |
Eメール | : |
URL | : |
タイトル | : 文字を押しつぶした形にするには? |
VB6です。
PictureBoxにフリーフォントの文字を書き込みフォントデータを取得しようとしています。
このデータを使って16x16のLEDマトリクスに文字を表示させるためです。
データを取得する方法はPixel単位でPictureBox内を16X、16Yでチェックしています。
ところがこのフォントは16x16で作られているのですが
文字の左側の縦1列のみが空になっています。
横書きにするときは、この空の1列が文字の区切りとなってOKです。
ところが縦書きにするときは(フォントの上か下の1行が空になっていないので)
文字どうしがくっついてしまいます。
PictureBoxに書き込むフォントサイズを小さくすれば、問題はありませんが。
文字は大きいままで縦書きしたとき区切りの1行がほしいのです。
フォントが左側1列、上1行を空にして15x15で作成されていれば理想なのです。
(こんなフリーフォントはあるのでしょうか?)
3種類ほどフリーフォントをインストールしてみましたが、みな同じでした。
そこで、苦肉の策として
何とかVBで文字を押しつぶした形にして上下方向の1行を空にできないかと
考えました。
色々試してみましたがダメでした。
もし可能でしたら教えてください。