tprinterのcanvasへのフォントサイズ設定について

でるでる 2007-06-06 13:05:09 No: 26530 IP: 192.*.*.*

Tprinter.canvas.fonts.size に対して、8.5という数字を設定したいのですが、sizeがintegerなため、設定できないで困っています。
というのは、小型プリンタ（POSレジとかについてるレシートプリンタです）に、印刷したりするのは出来たのですが、プログラムから用紙カットしたりしようとするとフォントサイズを8.5で設定しないといけないようです。
'Control'フォントでサイズ'8.5'で印字する方法があれば、教えて頂ければと投稿させて頂きました。
よろしくお願いします。

編集削除

Basser 2007-06-06 13:54:09 No: 26531 IP: 192.*.*.*

Font.Heightプロパティで設定すれば可能では？

編集削除

でるでる 2007-06-06 20:37:58 No: 26532 IP: 192.*.*.*

Basser様レスありがとうございます。
Font.Heightに設定してもダメでした。
logpy:=getdevicecaps(printer.handle,LOGPIXELSY);
font.height := Trunc(8.5*logpy/72);
とやってみましたが、結果は同じでした。
うーん。VBだと、font.size = 8.5 って出来るんですけどね〜。
delphiではどうやったらいいんだろう・・

編集削除

風来坊 2007-06-06 20:50:22 No: 26533 IP: 192.*.*.*

> printer.handle
じゃなくて printer.canvas.handle じゃねーの？

編集削除

でるでる 2007-06-08 14:22:43 No: 26534 IP: 192.*.*.*

風来坊様レスありがとうございます。
>じゃなくて printer.canvas.handle じゃねーの？
結果は、同じですね〜。制御文字が印字されます・・。
VCとかでこの部分作って、delphiから呼び出すしかないのかな〜。
'Control'フォントで、サイズ8.5で'P'を印字するとプリンタ側でコマンドと認識、サイズ9とかだと素直に'P'を印字しちゃうんですよね。

編集削除