[ecfisa]

Hola

Intenta de con este formato:

Código Delphi [-]
function AngleToStr(angle: Extended):string;
...
  Result := Format('%.2d° %.2d'' %.2d"',[d, trunc(m), trunc(s)]);
end;

Saludos