Страница 5 из 127
Часы на форме с точностью до минут
Напишите следующий код:
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Label1->Caption = FormatDateTime("hh:nn",Time());
Timer1->Interval=10000;// меньше число, больше точность
}
Напишите следующий код:
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Label1->Caption = FormatDateTime("hh:nn",Time());
Timer1->Interval=10000;// меньше число, больше точность
}