mm:= Pixel / GetDeviceCaps(Canvas.Handle, LOGPIXELSX) * 25.4; 转载于:https://www.cnblogs.com/FKdelphi/p/5843061.html