像素转成毫米

 

mm:= Pixel / GetDeviceCaps(Canvas.Handle, LOGPIXELSX) * 25.4;