关于窗口,打印等尺寸的换算!(30分)

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

Robot5

Unregistered / Unconfirmed
GUEST, unregistred user!
有谁知道窗口是按什么单位来计算长度的吗?听有人说是缇计算的。
如果是按缇,要怎么换算成像素和厘米?
 
窗体的长宽的单位是像素
可以得到每英寸的像素数。PixelsPerInch property (TCustomForm)
 
还有我在image中把图像改为新的大小,但打印出来的大小并不是改完的大小这是为什么?
代码如下:
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
Image1.Width:=150;
Image1.Height:=200;
end;
procedure TForm1.BitBtn3Click(Sender: TObject);
begin
if PrintDialog1.Execute then
begin
Printer.BeginDoc;
Printer.Canvas.Draw(40, 100, image1.Picture.Graphic);
Printer.EndDoc;
end;
end;
 
不用 Printer.Canvas.Draw(40, 100, image1.Picture.Graphic);

使用 Printer.Canvas.StretchDraw(Rect(100,100,500,500) ,image1.Picture.Graphic);
用Rect(100,100,500,500)来控制打印区域
 
哦!谢谢!
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部