Muchas gracias
[duilioisola].
Me alegraste el día. Funcionó perfecto.
Ya que de esta manera, con este código puedo obtener las coordenadas GPS de la imagen.
Código Delphi
[-]procedure TFormPrincipal.ClickImage(Sender: TObject);
var
ExifData: TExifData;
begin
Image1.Bitmap.Assign(TImage(Sender).Picture);
Image2.Bitmap.Assign(TImage(Sender).Picture);
Edit1.Text:= ImageList[TImage(Sender).Tag];
ExifData := TExifData.Create;
try
ExifData.LoadFromGraphic(Edit1.Text);
Label1.Caption:= 'Latitud: ' + ExifData.GPSLatitude.ToString + ' / Longitud: '+ ExifData.GPSLongitude.ToString;
finally
ExifData.Free;
end;
end;
Sólo me falta transformar las coordenadas geográficas a formato decimal para mostrar en un mapa dónde se tomó la fotografía.
Un abrazo