如何让字段左对齐或右对齐呢?(10分)

  • 主题发起人 主题发起人 ricezhou
  • 开始时间 开始时间
R

ricezhou

Unregistered / Unconfirmed
GUEST, unregistred user!
我在用TPrinter对象Printer做打印时,不只如何将从数据库中取得的字段
在打印纸上进行左对齐操作??
Printer.Canvas.TextOut(PosWidth+LineWidth*3,PosHeight,PrtRs.Fields['Emp_Salary'].Value);
如何将输出内容左对齐呢?????????????
 
?????????????
 
用DrawText函数即可:
比如:
Text为需要打印的内容。
var
PrintRect: TRect;
begin

PrintRect.Left := Round(Left * HoriPPI / 2.54);
PrintRect.Top := Round((Top) * VertPPI / 2.54);
PrintRect.Right := Round(Right * HoriPPI / 2.54);
PrintRect.Bottom := Round((Bottom) * VertPPI / 2.54);
DrawText(Printer.Handle,PChar(Text),Length(Text),PrintRect,DT_RIGHT);
end;

 
后退
顶部