[fpc-pascal] FormatSettings in library vs application

Graeme Geldenhuys mailinglists at geldenhuys.co.uk
Sun Apr 19 19:11:49 CEST 2020


It's been over a year since I looked at any Object Pascal code, so a bit
rusty. [bows his head in shame] :-)

I'm maintaining a library that uses the function seen below. I any FPC
(or Lazarus) application uses this library (eg: via a lcl package).

1) Will this function change the ShortDateFormat for the whole
application, or is the scope just inside that function?

2) Is the better solution to define a local TFormatSettings, define the
ShortDateFormat for that record, and then pass that to DateToStr as the
2nd parameter?

{convert date to string with 4-digit year and 2-digit month}
function OgFormatDate(Value : TDateTime) : string;
  S : string;
  FormatSettings.ShortDateFormat := 'yyyy-mm-dd';
  Result := DateToStr(Value);


More information about the fpc-pascal mailing list