Algoritma dan Pemrograman ( Mengaplikasikan fungsi IF dengan membuat form kelulusan )

Algoritma dan pemrograman kuliah Note Struktur Data

Tugas 1!
Yang pertama yang harus dilakukan adalah terutama sudah terinstalnya program atau software Borland Delphi, dan kali ini saya menggunakan yang versi Borland Delphi 7. :)
Berikut Step by Stepnya : 

• Jalankan Program Borland Delphi 7
• Klick File New >> Form ( karena saya inggin membuat program yang berbasis GUI)
• Mulai Bekerja.. Bissmillah  lancar .hhe :)
• Cari dan click icon Label ini

• Click dan drug pada form >>beralih ke window Object Inspector >> tab properties >> click caption untuk mengganti nama Label 1 menjadi Masukkan_Nilai ( untuk spasi menggunakan underscore), ubah ukuran maupun fontnya jika diperlukan . Kemudian buat Label  lagi dengan cara yang sama dengan nama Keterangan.

(edit StdCtrls)

• Click tombol edit ( seperti gambar diatas),>> click dan drug pada form >>  window object inspector pada tabulasi properties click text >> ganti edit1 jadi Nilai . Kemudian buat lagi dengan nama text status.

• Saatnya membuat tombol hasil pemrosesan dengan click  icon Button seperti gambar diatas >> click dan drug pada form. Pada object inspector >> caption >> ganti button dengan hasil. 

• Selanjutnya mari kita masukkan scriptnya dengan click 2x tombol hasil, kemudian terbukalah window unit1.pas >> ini script yang perlu ditambahkan..

procedure TForm1.HasilClick(Sender: TObject);

• Var
    nl:integer;
  begin
    nl := strtoint(Nilai.text);
    if nl >70 then status.Text := 'Lulus'
    else status.Text := 'Tidak lulus';
  
  end.

• Tekan Run / F9..
• ini hasilnya

Bagikan

Jangan lewatkan

Algoritma dan Pemrograman ( Mengaplikasikan fungsi IF dengan membuat form kelulusan )

4/ 5

Oleh Hanya Catatan Pribadi

Hanya Catatan Pribadi 23:32 Komentar