Tutorial Cara Membuat Setup Pada Program Delphi

Tutorial Cara Membuat Setup Pada Program Delphi - Pernah ga sih kalian iseng – iseng mikir kalo buat setup instaler program itu bagaimana? Kan lucu gitu udah habis habisan ngbangun sebuah program tapi gatau habis ini mau diapain , apalagi sampe gatau bikin instalernya. Oke kali ini mimin mau sharing deh tutornya .

Pertama kita siapkan dulu software nya, kali ini mimin menggunakan isetup-5.5.6. Nah buat temen-temen yang belum pada punya, bisa juga kok download link bawah.

• Download Inno Setup ver. 5.5.6

Next setelah kita instal, buka softwarenya

Isi sesuai dengan gambar, klik Next

isi sesuai dengan gambar, lalu Next

Klik Browse, kemudian cari file project (.exe) yang akan kita jadikan setup, kemudian centang sesuai dengan gambar lalu Next

Selanjutnya isi dan centang sesuai dengan gambar , kemudian klik Next

Bila ada, lampirkan file license dengan mengklik Browse lalu pilih file (txt), sesuai kebutuhan aja.

 Pilih bahasa yang akan kita gunakan pada saat proses instaler, pilih sesuai kebutuhan aja

 Browse, tunjukan letak folder output yang kita inginkan, kemudian berinama file sesuai dengan gambar, kemudian Next

Centang, Next

Klik Finish

Kemudian kita akan disuruh untuk mengsave file, usahakan disatu folderkan ya.

Setelah itu Run coba hasilnya

Terakhir, hasilnya akan muncul seperti ini .

Bagaimana, mudahkan ? Sekian dulu tutor kali ini, untuk  kurang lebihnya mohon maaf . Semoga dapat bermanfaat buat tugas kamu dan selamat mencoba . Ohiya disini juga mimin sertakan contoh file project (.exe) yang sudah mimin buat, temen-temen dapat download file nya pada link dibawah. Jika ada pertanyaan silahkan isi pada kolom komentar ! :)

• Download File Project (.exe)

Program Sederhana Menghitung Nilai Mahasiswa di Delphi

Program Sederhana Menghitung Nilai Mahasiswa di Delphi – Hai hai semuaaa kali ini mimin mau bagi tutor nih , yakni membuat program sederhana menghitung nilai mahasiswa di delphi ! Yapps.. langsung to the point aja ya .

Caption                                        Name                    Deskripsi

Program Menghitung Nilai         label5                    Judul
NPM                                            label1                    NPM
Nama                                           label2                    Nama
Nilai Akhir                                  label3                    Nilai Akhir
Grade                                           label6                   Grade
Keterangan                                  label7                    Keterangan
-                                                   Edit1                     EditBox NPM
-                                                   Edit2                     EditBox Nama
-                                                   Edit3                     EditBox Nilai Akhir
-                                                   Edit4                     EditBox Grade
-                                                   Edit5                     EditBox Keterangan

Mulai                                           Button1                Tombol Mulai
Proses                                          Button2                Tombol Proses
Selesai                                         Button3                Tombol Selesai

Setelah membuat layout yang sesuai pada gambar, selanjutnya Klik tombol Proses kemudian ketikan syntax berikut:

procedure TForm1.Button2Click(Sender: TObject);

var
na:real;
grade:string;
ket:string;

begin

na:=strtofloat(edit3.Text);

if na <=20 then begin
grade:='E';
ket:='MENGULANG';
edit5.Text:=ket;
edit4.Text:=grade;
end

else if na<=50 then begin
grade:='D';
ket:='TIDAK LULUS';
edit5.Text:=ket;
edit4.Text:=grade;
end

else if na<=60 then begin
grade:='C';
ket:='LULUS';
edit5.Text:=ket;
edit4.Text:=grade;
end

else if na<=70 then begin
grade:='B';
ket:='LULUS';
edit5.Text:=ket;
edit4.Text:=grade;
end

else if na<=95 then begin
grade:='A';
ket:='LULUS';
edit5.Text:=ket;
edit4.Text:=grade;
end

end;

Next, Klik tombol Selesai kemudian ketikan syntax ini:

procedure TForm1.Button3Click(Sender: TObject);

begin

close;

end;

Terakhir, Save dan Run program !!! Mudahkan J

Ohiya mimin juga sediain nih softcopynya, , tinggal download disini aja. buat temen-temen yang udah putus asa karena programnya error. :D

Sekian dulu tutor kali ini, untuk  kurang lebihnya mohon maaf . Semoga dapat bermanfaat buat tugas kamu ya !