Fungsi Waktu Tomorrow

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.



Fungsi Waktu Tomorrow Rating: 4.5 Diposkan Oleh: Good Dreamer

0 comments:

Posting Komentar

Diberdayakan oleh Blogger.