Bist du sicher, dass der Warnhinweis bei diesem Code hier kommt?
Delphi-Quellcode:
function GetMonatText(aMonat:Integer; short:Bool=False):String;
begin
if short then Result:=FormatSettings.ShortMonthNames[aMonat]
else Result:=FormatSettings.LongMonthNames[aMonat];
end;
Da wird doch nichts an FormatSettings zugewiesen, sondern nur gelesen...
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)