Как ввести системную дату и время с помощью TEdit?

[Bill Gates]

Год, месяц, день. Час, минута, секунда.
Или как вызвать системный диалог настройки даты и времени?

[Alar]

Я помог? или дальше разбираться?
Впринципе, интересный вопрос

procedure TForm1.Button1Click(Sender: TObject);
var s:_SYSTEMTIME;
begin
GetSystemTime(s);
SetSystemTime(s);

 { System time is represented with the following structure: }
//  PSystemTime = ^TSystemTime;
//  _SYSTEMTIME = record
//    wYear: Word;
//    wMonth: Word;
//    wDayOfWeek: Word;
//    wDay: Word;
//    wHour: Word;
//    wMinute: Word;
//    wSecond: Word;
//    wMilliseconds: Word;
//  end;
//  {$EXTERNALSYM _SYSTEMTIME}
//  TSystemTime = _SYSTEMTIME;
//  SYSTEMTIME = _SYSTEMTIME;
//  {$EXTERNALSYM SYSTEMTIME}


end;

[Ins]

А компонент DateTimePicker с закладки "Win32" не подойдет?

[Alar]

Ins, насколько я понял нужно изменить системное время.

[Ins]

Ins, насколько я понял нужно изменить системное время.

Насколько я понял, у него именно проблема с вводом, так как про изменение даты ему уже отвечали. Хотя возможно я неправильно понял вопрос

PS: SetSystemTime - это не совсем верно, нужно SetLocalTime. В чем разница - описано в документации, плюс привилегию SE_SYSTEMTIME_NAME нужно включать, она может быть выключена.