Crystal中没有直接执行此操作的功能。 因此，您必须创建一个可以为您完成的公式。

Google搜索"将纬度转换为度的公式"后，我发现该公式可以将度/分钟/秒转换为lat或 long：

学位+（分钟/60）+（秒/3600）

扭转这种情况的逻辑要复杂一些。 您将需要使用整数除法运算符" \"（对于常规除法，请使用"/"），余数函数和乘法。 我认为看起来像这样：

 {@ ConvertLatitude}
 NumberVar degs == 0;
 NumberVar分钟：= 0；
 NumberVar秒：= 0；
 NumberVar tmp：= 0;
 tmp：= Remainder（{MyTable.Latitude}，1）;
 degs：= {MyTable.Latitude}-tmp;
 分钟：= tmp * 60;
 tmp：=余数（分钟，1）;
 分钟：=分钟-tmp;
 secs：= Round（tmp * 60，0）;
 ToText（degs，0）+" degrees" + ToText（mins，0）+" minutes" + ToText（secs，0）+" seconds" 

请注意，我没有将乘以 分钟3600以秒为单位。 这是因为它已经被乘以60，而3600 = 60 * 60。

-Dell

非常感谢。 它确实起作用了。 我忘了要求经度转换。 是一样的方法吗？

谢谢

Manuel Duarte