令人头大的比例尺计算

[face=楷体_GB2312]项目中有要求，计算当前视图的比例尺，轻松搞定<img src="images/post/smile/dvbbs/em00.gif" />。
后来要求根据给定的比例尺缩放当前的比例尺，也搞定了。
<img src="images/post/smile/dvbbs/em11.gif" />，因为在状态栏中有当前视图的比例尺的显示，问题出现了<img src="images/post/smile/dvbbs/em11.gif" />，当我输入比例尺数据1：500去放大当前视图时，根据的比例尺得到的视图的比例不是1：500，而是1：502，1：1000的结果是1：1004，开始想，这可能是计算的误差值，通过一个误差比例系数调整就好了，<img src="images/post/smile/dvbbs/em11.gif" />没想到，当输入的比例尺小至某一个数值时，这个误差值变成负值了<img src="images/post/smile/dvbbs/em09.gif" />，到底是为什么，请高手不吝赐教，万分感激！
比例尺计算(delphi)：map.extent.width 除于 map.width[/face]

extent乘个地图单位看看再除width/（屏幕参数，具体有不同）看看

可能是我没有表述清楚，我计算出来：map的地图宽度单位为MM，map的屏幕宽度的单位也已经换算为MM，但是总是有一些误差。
请问大虾，如果按照已知比例尺去计算map的实际的EXTENT，有没有什么比较好的方法推荐

定义为double来计算，误差应该没那么大吧？

这是个如何获得屏幕和窗体象素，用各种单位来显示投影了的地图的例子，看有没用，是vb的。

http://www.gisempire.com/bbs/viewfile.asp?ID=645