fixed compiling for ARM64, powerpc and other ono x86 platforms

This commit is contained in:
ok2cqr 2016-05-05 20:46:36 +02:00
parent 05b1402113
commit f04c8a3880
2 changed files with 3 additions and 2 deletions

View File

@ -12,6 +12,7 @@ Legend:
- rigctld where not closed after closing cqrlog - fixed (Bill, WK2X)
- RBN monitor window was always opened after program started - fixed
- loading FromDate and ToDate from membership files fixed
- fixed compiling for ARM64, powerpc and other ono x86 platforms
2.0.0 (2016-04-20)
+ program should work also with MariaDB 10.1

View File

@ -4192,8 +4192,8 @@ end;
procedure TdmUtils.GetShorterCoordinates(latitude,longitude : Currency; var lat, long : String);
begin
latitude := RoundTo(latitude,-2);
longitude := RoundTo(longitude,-2);
latitude := RoundTo(Extended(latitude),-2);
longitude := RoundTo(Extended(longitude),-2);
if (latitude < 0) then
lat := FloatToStr(latitude*-1)+'S'