[求助]：版主，又得求助了？

追日

版主，上次仿照TSSD1.7表格编程的问题已经解决，但发现修改起来很不方便，为了进一步学习和提高，我想仿照TSSD2.6的表格编程，但发现有一定的难度。最主要的是表格控件里面的数据、线条、文字怎样转换到CAD中？首先，使用表格控件（delphi中的stringgrid控件）时，它的长宽数值都是像素，但转换到CAD中一般都是毫米或者英制单位（像素和毫米怎样转换）。另外，在表格控件里编辑的文字的字号也和CAD中的字号不一致。我能在delphi中方便的编出类似电子表格的程序，但和CAD怎样无缝连接，头都让它搞大了！！

efan2000

可以自己定义一个换算的关系，比如像素与毫米的换算，字号与字高的换算，而如果通过公式，转到CAD中就无法实现预期的效果。研究了一下ACAD本身的表格转化，好象也不是按一定的关系，而是动态调整。

追日

谢谢，请教一下毫米与像素以及字号与字高的换算公式

efan2000

具体转化公式可以参考Excel中的函数。
PointsToScreenPixelsX ，将横向度量值由以点（文档坐标）为单位转换为以屏幕像素（屏幕坐标）为单位。
PointsToScreenPixelsY，将纵向度量值由以点（文档坐标）为单位转换为以屏幕像素（屏幕坐标）为单位。
CentimetersToPoints，将计量单位从厘米转换为磅（一磅等于 0.035 厘米）。
InchesToPoints ，将度量单位从英寸转换为磅。

我觉的必要这么做，在表格控件中可能是整数，但转换到ACAD中后的尺寸都是小数的，这可能就与设想不一致了。应该做一个参照表，比如：自己定义1毫米等于多少像素，1字号高度等于多少CAD字高，这样才能保证都是整数，或者只有一两位的小数。

追日

谢谢，同意你的观点