Z
zangqi
Unregistered / Unconfirmed
GUEST, unregistred user!
VB中
Dim ds Asdo
uble
ds = Map1.Distance(0, 0, 180, 0)
MsgBox "距离=" + Format$(ds, "#.###") + "公里"
DS的值为12436.792
在delphi中,
edit1.Text := floattostr(map1.Distance(0,0,180,0));
值为2.63659674624068E-308
为什么在delphi中算出的值是这样的?如何解决?
Dim ds Asdo
uble
ds = Map1.Distance(0, 0, 180, 0)
MsgBox "距离=" + Format$(ds, "#.###") + "公里"
DS的值为12436.792
在delphi中,
edit1.Text := floattostr(map1.Distance(0,0,180,0));
值为2.63659674624068E-308
为什么在delphi中算出的值是这样的?如何解决?