Odczyt bieżącego czasu
Aby po kliknięciu przycisku Button1 na etykiecie Label1 wyświetlić bieżący czasy wywołujemy funkcję TimeToStr(), a jako jej argument podajemy funkcję Time(). Funkcja Time() zwraca czas jako obiekt TDateTime, który jest zamieniany na łańcuch AnsiString przez funkcję TimeToStr():
Unit1.cpp |
void __fastcall
TForm1::Button1Click(TObject *Sender) { Label1->Caption = TimeToStr(Time()); } |