Format Tanggal DateSeparator

Pemisah tanggal di masing-masing negara bisa berbeda-beda. Kita bisa saja mengubah regional setting milik Windows. Akibatnya seluruh software pada Windows itu akan berubah semua. Jika kita hanya menginginkan format tanggal berubah hanya pada saat program yang Anda buat berjalan, maka Anda bisa mengubahnya secara lokal saja. Artinya, setelah program Anda selesai dijalankan, format akan tetap mengacu pada regional setting milik Windows.

uses
  SysUtils;
begin
  try
    ShortDateFormat := 'dd/mm/yyyy';
    DateSeparator := '/';
    Writeln('Tanggal Sekarang: ', DateToStr(Now));

    DateSeparator := '-';
    Writeln('Tanggal Sekarang: ', DateToStr(Now));

    DateSeparator := '*';
    Writeln('Tanggal Sekarang: ', DateToStr(Now));

    DateSeparator := '*';
    Writeln('Tanggal Sekarang: ', DateToStr(Now));

    DateSeparator := '_';
    Writeln('Tanggal Sekarang: ', DateToStr(Now));

    DateSeparator := ':';
    Writeln('Tanggal Sekarang: ', DateToStr(Now));

    DateSeparator := '~';
    Writeln('Tanggal Sekarang: ', DateToStr(Now));
    Readln;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.

DateSeparator harus diikuti pendefinisian format tanggal. Tanpa itu, pemisah tanggal akan memakai default, biasanya dengan '/'.

Format Tanggal DateSeparator 2018-11-02T13:15:00+07:00 Rating: 4.5 Diposkan Oleh: Good Dreamer