毫米和像素的换算

像素与毫米的转换
转换还需要知道另一个参数：DPI（每英寸多少点）
象素数 / DPI = 英寸数
英寸数 * 25.4 = 毫米数

对于显示设备，不管是打印机还是屏幕，都有一种通用的方法
先用GetDeviceCaps(设备句柄，LOGPIXELSX)
或者
GetDeviceCaps(设备句柄，LOGPIXELSY)获得设备每英寸的像素数
分别记为：px 和　py
一英寸等于25.4mm
那么毫米换算成像素的公式为　
水平方向的换算：　x * px /25.4
垂直方向的换算：　y * py /25.4
像素换算为毫米 x * 25.4 / px
在程序中这么写
MyControl.Height := 10{mm} * PixelsPerInch * 10 div 254;
分子和分母同乘以10，将浮点数运算转化为整数运算，效率更高