Memberi Setting Tanggal Indonesia pada VCL TDateEdit Rxlib

Mungkin ada dari Anda yang memakai komponen (VCL) TDateEdit buatan Rxlib. Jika belum punya, silakan download disini. Bagi penggemar Lazarus, pustaka Rxlib memang sudah sangat biasa, seperti yang terlihat dibawah ini:

Seperti Anda lihat, baik tanggal dan nama hari TDateEdit mengikuti setting Windows. Lantas bagaimana jika kita menginginkan setting tanggal indonesia tanpa mengubah Regional setting Windows? Gampang! Tulis kode berikut di OnCreate milik Form

DateSeparator := '-';
ShortDateFormat := 'dd/mm/yyyy'; LongDateFormat := 'dddd, MMMM dd, yyyy';

ShortDayNames[1] := 'Min'; LongDayNames[1] := 'Minggu';
ShortDayNames[2] := 'Sen'; LongDayNames[2] := 'Senin';
ShortDayNames[3] := 'Sel'; LongDayNames[3] := 'Selasa';
ShortDayNames[4] := 'Rab'; LongDayNames[1] := 'Rabu';
ShortDayNames[5] := 'Kam'; LongDayNames[1] := 'Kamis';
ShortDayNames[6] := 'Jum'; LongDayNames[1] := 'Jumat';
ShortDayNames[7] := 'Sab'; LongDayNames[1] := 'Sabtu';

ShortMonthNames[1] := 'Jan'; LongMonthNames[1] := 'Januari';
ShortMonthNames[2] := 'Peb'; LongMonthNames[2] := 'Pebruari';
ShortMonthNames[3] := 'Mar'; LongMonthNames[3] := 'Maret';
ShortMonthNames[4] := 'Apr'; LongMonthNames[4] := 'April';
ShortMonthNames[5] := 'Mei'; LongMonthNames[5] := 'Mei';
ShortMonthNames[6] := 'Jun'; LongMonthNames[6] := 'Juni';
ShortMonthNames[7] := 'Jul'; LongMonthNames[7] := 'Juli';
ShortMonthNames[8] := 'Ags'; LongMonthNames[8] := 'Agustus';
ShortMonthNames[9] := 'Sept'; LongMonthNames[9] := 'September';
ShortMonthNames[10] := 'Okt'; LongMonthNames[10] := 'Oktober';
ShortMonthNames[11] := 'Nop'; LongMonthNames[11] := 'Nopember';
ShortMonthNames[12] := 'Des'; LongMonthNames[12] := 'Desember';

Sekarang kita lihat hasilnya:

Memberi Setting Tanggal Indonesia pada VCL TDateEdit Rxlib 2015-08-07T15:10:00+07:00 Rating: 4.5 Diposkan Oleh: Good Dreamer