DateTimeToString. Проблема с выводом русских символов. Опции

[Билли Боб]

При использовании кода

datetimetostring(s,'dddd dd mmmm yyyy',date);
writeln(s);

выводится дата, только почему день недели и месяц выведен иероглифами?
Как сменить кодировку на русский?
Или можно вывести на английском?

[IUnknown]

Или можно вывести на английском?

Можно, начиная с FPC 2.4.4 (GetLocaleFormatSettings добавили в SysUtils именно в этой версии компилятора):

{$H+}
uses sysutils;

var
   date : tdatetime;
   s : string;

begin
   GetLocaleFormatSettings ($409, DefaultFormatSettings);
   date := Now;
   DateTimeToString (s, 'dddd dd mmmm yyyy', date);
   writeln (s);
end.

выдаст информацию на английском.