Zeit automatisch auswählen

[rainman51]

Wie kann man die Zeit in Delphie automatisch anzeigen lassen und zum berechenen nehmen, mich interessiert vorallem das aktuelle JAhr...

und wenn ihr dann mir noch bei dem Problem mit dem Diagramm helfen könnten wäre das schön...
Ich kann meinen balken im diagramm keine wert zuweisen, aus einem stringgrid..

[dominikkv]

Label1.Caption := TimeToStr(Now);

[mkinzler]

Die Funktion date() gibt, wenn man sie ohne Parameter aufruft, das aktuelle Datum zurück. Mit der Funktion DecodeDate() kann man ein datum dann zerlegen.

[Aurelius]

zur zeit: Nutze einen Timer! (unter System)
Beispiel:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
var tag, datum : string;
begin
  tag := Timetostr(Time);
  datum := DatetoStr(Date);
  label1.caption := tag + ';  ' + datum;      //Uhrzeit und Datum
end;

[halinchen]

Delphi-Quellcode:

TimeToStr(Time)//Time liefert die Zeit, es wird gleich in einen String kovertiert
DateToStr(Date)//Date liefert das Datum, es wird gleich in einen String kovertiert

Das sollte dir helfen.


Guck auch mal bei EncodeDate (bzw. DecodeDate) und EncodeTime (bzw. DecodeTime). Da bekommst du die einzelnen Werte heraus.

halinchen

//Edit:

Delphi-Quellcode:

var
Year, Month, Day: Word;
begin
DecodeDate(Date,Year,Month,Day);//Extrahiert aus dem Datum das Jahr, den Monat und den Tag
end;

Das gibt es auch bei der Zeit.

Falls du einen Variablentyp brauchst: TDate und TTime