ich versuche das heutige Datum folgendermaßen auszugeben
DDMMYYYY ohne , . dazwischen, also als INT:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var
Present: TDateTime;
Year, Month, Day, Word;
begin
Present:= Now;
SysUtils.DecodeDate(Present, Year, Month, Day);
end;
Edit2.Text := IntToStr(Day) + IntToStr(Month) + InTtoStr(Year);
habe ein kleines Edit2. - fenster wo ich dann das Datum in folgender Form haben will: DDMMYYYY
bei mir steht beim ausführen jedoch in dem kleinen Fenster nur 004096
DAY hat wert 0 , MONTH den wert 0 und YEar den wert 4096, WARUM ? ? was mach ich falsch?
was hat es mit dem Word auf sich?
habe den code zum teil von
http://docwiki.embarcadero.com/CodeE...e_%28Delphi%29