Delphi Saat Tarih

Delphide saat tarih göstermek için aşağıda ki kodu kullanabiliriz.

procedure TForm1.Button1Click(Sender: TObject);

begin

form1.caption:='Tarih   '+datetostr(date)+   '   Saat  '+ timetostr(time) ;

end;

end.

Form çalışınca görmek için;

procedure TForm1.FormCreate(Sender: TObject);

begin

form1.caption:='Tarih   '+datetostr(date)+   '   Saat  '+ timetostr(time) ;

end;

end.