W
Versuchs doch mal mit:
DecodeTime:
zerlegt das im Parameter Time übergebene Objekt in Stunden, Minuten, Sekunden und Millisekunden.
Beispiel aus der C++ Hilfe
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Word Year, Month, Day, Hour, Min, Sec, MSec;
TDateTime dtPresent = Now();
DecodeDate(dtPresent, Year, Month, Day);
Label1->Caption = AnsiString("Heute ist Tag ") + IntToStr(Day) + AnsiString(" des Monats ") + IntToStr(Month) + AnsiString(" im Jahr ") + IntToStr(Year);
DecodeTime(dtPresent, Hour, Min, Sec, MSec);
Label2->Caption = AnsiString("Die Uhrzeit ist Minute ") + IntToStr(Min) + AnsiString(" der Stunde ") + IntToStr(Hour);
}
Gruß
Wes