Wednesday, February 3, 2021

Membuat Masa Aktif Program | Delphi Freepascal

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;

Sebelum melanjutkan membaca artikel ini, berikut adalah artikel yang berkaitan dengan judul artikel Membuat Masa Aktif Program | Delphi Freepascal :
ok, silahkan lanjut membaca.

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