• Welcome to Forum.Deepsoftware.Com. Please login or sign up.
 
March 28, 2024, 06:51:01 pm

News:

SMF - Just Installed!


GPS Quality

Started by Westwind80, August 10, 2020, 04:21:06 am

Previous topic - Next topic

Westwind80

Hi Support,
  How do I determine the quality for the position and speed are accureate? By using the quality.valid function?

Roman Novgorodov

Hello

Can you provide some more info about connected GPS device?

Roman Novgorodov
DeepSoftware llc - The professional components for Delphi/CBuilder/.NET. The high quality custom software development.
Forums.nrCommLib.Com - DeepSoftware Tech Support Forum.

Westwind80

Hello Roman,
  I've connected it to a generic GPS antenna onboard a ship using RS232.

Roman Novgorodov

August 10, 2020, 10:42:36 am #3 Last Edit: August 10, 2020, 11:32:42 am by Roman Novgorodov
Thank you for information.

You can install trial version of nrComm Lib and try to build GPSDemo project.
After connection to GPS device it shows quality info.
You can open the project source and see the following event handler:

procedure TForm1.nrGps1Coordinate(Sender: TObject;
  Coordinate: TnrGpsCoordinate; Course: TnrGpsCourse;
  Quality: TnrGpsQuality);
begin
  Label1.Caption := 'Latitude: ' + FloatToStr(Coordinate.Latitude);
  Label2.Caption := 'Longitude: ' + FloatToStr(Coordinate.Longitude);
  Label3.Caption := 'Altitude: ' + FloatToStr(Coordinate.Altitude);

  Label4.Caption := 'Speed: ' + FloatToStr(Course.Speed);
  Label5.Caption := 'Track: ' + FloatToStr(Course.Track);

  Label6.Caption := 'Track satellites: ' + IntToStr(Quality.Satellites);
  Label7.Caption := 'Valid: ' + BoolToStr(Quality.Valid, True);

  //Quality information !!!!!!!!!!!!!!!!

  Label8.Caption := 'DOP: ' + FloatToStr(Quality.DOP);       
  Label9.Caption := 'HDOP: ' + FloatToStr(Quality.HDOP);   
  Label10.Caption := 'VDOP:  ' + FloatToStr(Quality.VDOP);

end;

Roman Novgorodov
DeepSoftware llc - The professional components for Delphi/CBuilder/.NET. The high quality custom software development.
Forums.nrCommLib.Com - DeepSoftware Tech Support Forum.

Westwind80

Hi,
  how do i convert coordinate.latitude result to degree,minute,second format?
  The result I got from coordinate.latitude is 516.508789 and coordinate.longitude is 11514.52734

Thanks

Roman Novgorodov

Hello

Possible code can look like following:

var
  v : single;
  degr : integer;
  minute : integer;
  second : integer;
begin
  v := 11514.52734
  degr := Integer(v / 100);
  minute :=  Integer(v - degr);
  second := Integer((v mod 1) * 60);
end;


Roman Novgorodov
DeepSoftware llc - The professional components for Delphi/CBuilder/.NET. The high quality custom software development.
Forums.nrCommLib.Com - DeepSoftware Tech Support Forum.

Westwind80