TryStrToDate klappt nicht - wer weiss Rat?

[wschrabi]

Hallo Leute,
ich habe ein engl. DATUM mit '29/Dec/2017' vorliegen und will es mit dieser Procedure testen.
(nur ein demo)
Aber ich weiss nicht wieso er bei TryStrToDATE false gibt.

Delphi-Quellcode:

procedure test;
var
   datestr: string;
   outresult: TDateTime;
   FSin: TFormatsettings;
begin
   datestr:='29/Dec/2017';
   
   FSin := TFormatSettings.Create('us-us');
   FSin.longDateFormat:='dd/mmm/yyyy';  
   FSin.Dateseparator:='/';
   if TryStrToDate(datestr,outresult,FSin) then
      begin
      ShowMessage(Format('OK fmt: dd/mmm/yyyy : %s',[datestr]))
      end
   else
      ShowMessage(Format('WRONG fmt: not dd/mmm/yyyy : %s',[datestr]))
      
end;