S
suduan
Unregistered / Unconfirmed
GUEST, unregistred user!
设置打印字体,
printer.Canvas.Font.Name:='Ms Sans Serif';
printer.Canvas.Font.size:=10;
nCharWidth:=printer.Canvas.TextWidth('a');
nCharHeight:=printer.Canvas.TextHeight('a');
如果没有1,2行,nCharWidth等于34
有了1,2行,nCharWidth等于7
而实际上没有1,2行的化,字体也是'Ms Sans Serif',大小为10呀
printer.Canvas.Font.Name:='Ms Sans Serif';
printer.Canvas.Font.size:=10;
nCharWidth:=printer.Canvas.TextWidth('a');
nCharHeight:=printer.Canvas.TextHeight('a');
如果没有1,2行,nCharWidth等于34
有了1,2行,nCharWidth等于7
而实际上没有1,2行的化,字体也是'Ms Sans Serif',大小为10呀