5,387
社区成员
发帖
与我相关
我的任务
分享FrReport 报表关于字符的问题
我在使用FrReport打印书签的时候如: I1247.48/JY 的时候我用了18号字体，但是字符之间的距离也拉大了，
问题1 ， 缩小字符之间的距离， 2， 设置字符的长宽比例
问题1 ， 缩小字符之间的距离， 2， 设置字符的长宽比例
...全文
请发表友善的回复…
发表回复
hero_yin 2004-04-06
- 打赏
- 举报
SetTextCharacterExtra(Canvas.Handle, 15);
Canvas.TextOut(0, 0, '每个字符间隔15象素');
给分～～
Canvas.TextOut(0, 0, '每个字符间隔15象素');
给分～～
hero_yin 2004-04-06
- 打赏
- 举报
procedure TForm1.Button2Click(Sender: TObject);
var
h:HFont;
begin
h:=CreateFont(50,20,10,10,FW_THIN,0,0,0,0,0,0,0,DEFAULT_PITCH or FF_DONTCARE,'宋体');
if(h=0)then
RaiseLastWin32Error();
Label1.Font.Handle:=h;
end;
var
h:HFont;
begin
h:=CreateFont(50,20,10,10,FW_THIN,0,0,0,0,0,0,0,DEFAULT_PITCH or FF_DONTCARE,'宋体');
if(h=0)then
RaiseLastWin32Error();
Label1.Font.Handle:=h;
end;
coreblood 2004-04-06
- 打赏
- 举报
up
hhzqf1980 2004-04-05
- 打赏
- 举报
帮你顶！！
coreblood 2004-04-05
- 打赏
- 举报
up
coreblood 2004-04-03
- 打赏
- 举报
自动伸展解决不了问题
pwzhu666 2004-04-03
- 打赏
- 举报
自动伸展阿
coreblood 2004-04-03
- 打赏
- 举报
up
