memo中的文字输入到Image中的问题 ( 积分: 100 )

  • 主题发起人 主题发起人 tsxq
  • 开始时间 开始时间
T

tsxq

Unregistered / Unconfirmed
GUEST, unregistred user!
Image与memo的高、宽均一致。用memo设置好多行文字后,并按memo中字体的设置逐一textuot到image中。结果每一行总有几个字不见了。后来发现memo中的象素好像与Image中的象素不一样,只好按一定比例缩小Image中的文字的大小,才能完整地显示在Image中。
我想这个办法有些笨,请教各位仁兄慈妹,可有简单的办法?
 
你可以设置一下canvas的字体和memo的一致
 
是那样设置了的:
Image1.Canvas.Font.Assign(memo1.Font);
for i:=0 to memo1.Lines.Count-1 do begin
Image1.Canvas.TextOut(x,y,memo1.Lines);
end;

要如下才能完整显示:
Image1.Canvas.Font.Size:=memo1.Font.Size -memo1.Font.Size div 6;
for i:=0 to memo1.Lines.Count-1 do begin
Image1.Canvas.TextOut(x,y,memo1.Lines);
end;
 
字体在那里可以设的.
 
后退
顶部