|
Как определить день недели
Как определить день недели
|
Все люди встретили новый век в этот новый год, а программисты встретят его в 2048 году.... т.к. по мнению программистов в 1 веке не 1000 лет, а 1024.
|
procedure TForm1.Button1Click(Sender: TObject);
var
d: TDateTime;
begin
d := StrToDate(Edit1.Text);
ShowMessage(FormatDateTime('dddd',d));
end;
|
Статья Как определить день недели раздела Синтаксис Дата и Время может быть полезна для разработчиков на Delphi и FreePascal.
Комментарии и вопросы
:: Главная :: Дата и Время ::
|
|
