Hallo

mit dieser Funktion will ich eigentlich das Datum in einem Variable (String) speichern, aber es wird immer das Datum 30.12.1899 gespeichert, wieso? Das Datum meines Rechners ist richtig eingetragen. Woran kanns sonst liegen?

Grüße aus Düsseldorf

Du solltest uns vielleicht sagen, wie du es bisher versucht hast.

Chris

Hi,

dieses Datum entspricht dem Wert 0 einer tDateTime Variablen.

Sie enthält im Vorkomma-Anteil die Anzahl Tage als Wert ab dem 30.12.1899
und im Nachkomma-Anteil die Uhrzeit als Anteil eines Tages.

Gruss

Ich Trottel ^^

markieren

Delphi-Quellcode:

procedure Tnewsverf.Panel1Click(Sender: TObject);
var i: TDateTime;
    a: string;
begin
  a := Datetostr(i);
  news.memo.Lines.Add(a);
end;

wie kann ich in der variabel a das aktuelle Datum speichern? Hilfe!!!

mfg isofaind

i:=now;

Zitat von isofaind2:

Ich Trottel ^^

markieren

Delphi-Quellcode:

procedure Tnewsverf.Panel1Click(Sender: TObject);
var i: TDateTime;
    a: string;
begin
  a := Datetostr(i);
  news.memo.Lines.Add(a);
end;

wie kann ich in der variabel a das aktuelle Datum speichern? Hilfe!!!

mfg isofaind

Versuchs mal mit

  a := DateToStr(Date); Die Funktion Date liefert das aktuelle Datum, Time die aktuelle Zeit und Now Datum und Uhrzeit.

Gruss