Страница 2 из 127
Получение текущей даты и времени (VCL вариант)
// для получения текущей даты и времени воспользуйтесь функцией
// Now() из модуля Sysutils.hpp . Отобразить полученные дату и
// время можно следующим образом (Button1 - кнопка на форме):
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form1->Caption = DateTimeToStr(Now());
}