Namanya saja Tomorrow, sudah jelas fungsi yang berada di unit DateUtils ini berguna untuk mengetahui "besok itu tanggal berapa sih". Tentu saja kita menghitungnya dengan mengetahui tanggal sekarang dengan fungsi Now atau Date.
Anda bisa juga menggunakan IncDay untuk mengetahui tanggal esok. Mana yang Anda pilih hasilnya akan sama.
uses
SysUtils, DateUtils;
var
Tgl, Bln, Thn : Word;
TanggalBaru : TDateTime;
begin
try
writeln('Sekarang tanggal ', DateToStr(Now));
writeln('Besok tanggal (IncDay): ', DateToStr(IncDay(Now)));
writeln('Besok tanggal (Tomorrow): ', DateToStr(Tomorrow));
readln;
except
on E:Exception do
Writeln(E.Classname, ': ', E.Message);
end;
end.
Home /
besok /
command /
dasar /
delphi /
fungsi /
hari /
sintak /
syntax /
tanggal /
tgl /
tomorrow /
waktu /
Fungsi Waktu Tomorrow
Fungsi Waktu Tomorrow
Langganan:
Posting Komentar (Atom)
Diberdayakan oleh Blogger.
0 comments:
Posting Komentar