Selamat datang di blog ali-mahdali.blogstpot.com, kali ini penulis memposting artikel yang berjudul Membuat Masa Aktif Program | Delphi Freepascal yang mana artikel ini dapat kalian akses melalui alamat : https://ali-mahdali.blogspot.com/2021/02/membuat-masa-aktif-program-delphi.html,
tanpa basa-basi yuk disimak artikelnya dibawah ini. Selamat membaca
berikut ini adalah script untuk membuat masa aktif aplikasi atau program
var
tahun , bulan , tanggal: integer;
begin
tahun:=2021;
bulan:=2;
tanggal:=2;
if (Date >= EncodeDate(tahun, bulan, tanggal)) then
begin
MessageDlg(PChar('Masa software anda telah habis , Software dihentikan !!! silahkan hubungi pengembang untuk mengaktifkan software anda'),mtInformation,[mbOK],0);
Application.Terminate;
end;
Terimakasih atas kunjungan Anda dan Karena telah sudi membaca artikel yang berjudul Membuat Masa Aktif Program | Delphi Freepascal.Tak Lengkap Rasanya Jika Kunjungan Anda di Blog ini Tanpa Meninggalkan Komentar, untuk Itu Silahkan Berikan Kritik dan saran Pada Kotak Komentar di bawah. Anda boleh menyebarluaskan atau mengcopy artikel Membuat Masa Aktif Program | Delphi Freepascal ini jika memang bermanfaat bagi anda, namun jangan lupa untuk mencantumkan link sumbernya. Terima Kasih, Happy Blogging :)
EmoticonEmoticon