如何使用Delphi计算当前日期的日出和日落时间

给定特定纬度和经度并使用Delphi(我使用的是XE2),我需要确定当天的日出和日落时间(当地时间).我发现 this article并使用了 SysTools library,但结果与英国公布的表格不一致.

有人见过这种pascal算法吗？

解决方法

一些随机网站：

> SunTime Component
> Torry’s Delphi Pages