Class TGPSReadWrite

Description

Hierarchy

Fields

Methods

Properties

Unit

xomGPSReadWrite

Declaration

type TGPSReadWrite = class(TGPSBase)

Description

TGPSReadWrite

Hierarchy

TObject
TGPSBase
TGPSReadWrite

Overview

Methods

	`procedure AfterConstruction; override;`
	`function FindWikiLocation (const ALat, ALon: Double; const ALocation: TGPSLocation; const ADistance: Double = 0.5): Boolean; virtual;`
	`function FindCountryDetails (const ACountryCode: WideString; const ALocation: TGPSLocation): Boolean; virtual;`
	`function FindTimeZoneOffset (const ALat, ALon: Double; const ALocation: TGPSLocation): Boolean; virtual;`
	`function DownloadCountries (const ACountries: TidElement): Boolean; virtual;`
	`function ReadGpsPos(const ATag: TTifTag): Double; virtual;`
	`procedure StoreValue(const ATag: TTifTag; const Value: Double); virtual;`
	`procedure WriteByteValue(const ATag: TTifTag; const AValue: Byte); virtual;`
	`procedure WriteGpsPos(const ATag: TTifTag; APos: Double); virtual;`
	`procedure WriteTimeValue(const ATag: TTifTag; const ATime: TTime); virtual;`
	`function DetermineContinent(const ALat, ALon: Double): TGPSContinent; virtual;`
	`function TifGPSCoord2Deg (const AValue: WideString; ADirection: String): Double; virtual;`
	`function TifGPSCoord2XMPGps (const AValue: WideString; const ADirection: String): WideString; virtual;`
	`function ReverseLookup (const ALat, ALon: Double; const ALocation: TGPSLocation): Boolean; virtual;`
	`function ForwardLookup (const ALocationName: WideString; var ALat: Double; var ALon: Double; var ARadius: Double): Boolean; virtual;`
	`function LookupAltitude (const ALat, ALon: Double): Double; virtual;`
	`procedure CopyToClipboard (const ALat, ALon, AAlt: Double); virtual;`
	`procedure CopyToClipboardFull (const ALat, ALon, AAlt: Double; const ALocation, ACity, AState, ACountryCode, ACountry: WideString; const AAdditional: TidElement = nil); virtual;`
	`function CanPaste: Boolean; virtual;`
	`function PasteFromClipboard (var ALat: Double; var ALon: Double; var AAlt: Double): Boolean; virtual;`
	`function PasteFromClipboardFull (var ALat: Double; var ALon: Double; var AAlt: Double; var ALocation: WideString; var ACity: WideString; var AState: WideString; var ACountryCode: WideString; var ACountry: WideString; const AAdditional: TidElement): Boolean; virtual;`

Properties

	`property LastError: WideString read FLastError;`
	`property Language: String read FLanguage write FLanguage;`
	`property GoogleAPIKey: String read FGoogleAPIKey write FGoogleAPIKey;`
	`property IGSAPIKey: String read FIGSAPIKey write FIGSAPIKey;`
	`property LookupService: TGEOLookupService read FLookupService write FLookupService;`

Description

Methods

	`procedure AfterConstruction; override;`

	`function FindWikiLocation (const ALat, ALon: Double; const ALocation: TGPSLocation; const ADistance: Double = 0.5): Boolean; virtual;`

	`function FindCountryDetails (const ACountryCode: WideString; const ALocation: TGPSLocation): Boolean; virtual;`

	`function FindTimeZoneOffset (const ALat, ALon: Double; const ALocation: TGPSLocation): Boolean; virtual;`

	`function DownloadCountries (const ACountries: TidElement): Boolean; virtual;`

function ReadGpsPos(const ATag: TTifTag): Double; virtual;

Read/Write GPS values in an EXIF Record

The GPSLatitude and GPSLongitude are stored as 3 subsequential UnsignedRational bytes representing 1. degrees, 2. minutes and 3. seconds

	`procedure StoreValue(const ATag: TTifTag; const Value: Double); virtual;`
write a Double as a rational value to EXIF

	`procedure WriteByteValue(const ATag: TTifTag; const AValue: Byte); virtual;`
write a byte value to an Exif tag

	`procedure WriteGpsPos(const ATag: TTifTag; APos: Double); virtual;`
write a GPS decimal position to an Exif Tag

	`procedure WriteTimeValue(const ATag: TTifTag; const ATime: TTime); virtual;`
write the time part of a TDateTime value to an Exif tag

	`function DetermineContinent(const ALat, ALon: Double): TGPSContinent; virtual;`
roughly determine the continent for a lat/lon

	`function TifGPSCoord2Deg (const AValue: WideString; ADirection: String): Double; virtual;`
Convert a TIF Tag GPS coordinate to degrees

	`function TifGPSCoord2XMPGps (const AValue: WideString; const ADirection: String): WideString; virtual;`
Convert a TIF Tag GPS coordinate an XMP String

	`function ReverseLookup (const ALat, ALon: Double; const ALocation: TGPSLocation): Boolean; virtual;`
perform a reverse lookup for location info (decimal Lat/Lon)

	`function ForwardLookup (const ALocationName: WideString; var ALat: Double; var ALon: Double; var ARadius: Double): Boolean; virtual;`
find coordinates for a specific location on the map (uses Google)

	`function LookupAltitude (const ALat, ALon: Double): Double; virtual;`
perform a reversed lookup to retrieve the altitude for a GEO location (lat/lon)

	`procedure CopyToClipboard (const ALat, ALon, AAlt: Double); virtual;`
copy coordinates to clipboard

	`procedure CopyToClipboardFull (const ALat, ALon, AAlt: Double; const ALocation, ACity, AState, ACountryCode, ACountry: WideString; const AAdditional: TidElement = nil); virtual;`

	`function CanPaste: Boolean; virtual;`

	`function PasteFromClipboard (var ALat: Double; var ALon: Double; var AAlt: Double): Boolean; virtual;`

	`function PasteFromClipboardFull (var ALat: Double; var ALon: Double; var AAlt: Double; var ALocation: WideString; var ACity: WideString; var AState: WideString; var ACountryCode: WideString; var ACountry: WideString; const AAdditional: TidElement): Boolean; virtual;`

Properties

	`property LastError: WideString read FLastError;`

	`property Language: String read FLanguage write FLanguage;`

	`property GoogleAPIKey: String read FGoogleAPIKey write FGoogleAPIKey;`

	`property IGSAPIKey: String read FIGSAPIKey write FIGSAPIKey;`

	`property LookupService: TGEOLookupService read FLookupService write FLookupService;`

Generated by PasDoc 0.15.0.