Percabangan Pada Bahasa Pemrograman Delphi


Assalamu'alaikum Wr Wb

Selamat datang di web Sibukngoding.com. Pada kesempatan kali ini saya akan menjelaskan tentang fungsi percabangan pada bahasa pemrograman Delphi. Fungsi percabangan sering di pakai dalam bahasa pemrograman manapun tak terkecuali Delphi. Percabangan sendiri merupakan operator yang digunakan untuk menentukan pilihan terhadap beberapa pilihan yang ada. 

Dalam bahasa pemograman Delphi mengenal dua operator per cabangan :

1. Percabangan If

Merupakan operator percabangan yang digunakan untuk menentukan pilihan atas beberapa kondisi yang merupakan syarat terhadap pilihan yang sudah ditentukan.
Ada dua model percabangan if

a. Percabangan Untuk Kondisi Pilihan Tunggal

Merupakan operator percabangan yang digunakan untuk menentukan sebuah pilihan dengan kondisi tunggal
Bentuk Umum
If Syarat then hasil;

Contoh
If Nilai > 80 then keterangan := 'Lulus';

b. Percabangan Untuk Kondisi Majemuk

Merupakan operator percabangan yang digunakan untuk menentukan pilihan dengan kondisi yang harus dipenuhi lebih dari satu.

Bentuk Umum
If Syarat1 then
Hasil1
Else If syarat2 then
Hasil2
Else
……………
……………
end;

Contoh
If  nilai > 80 then Grade := 'A' Else
if nilai > 70  then Grade: = 'B' else
if nilai > 60 then Grade := 'C' else
Grade := 'E'

2. Percabangan Case

Case of adalah merupakan metode lain dari sebuah percabangan, berfungsi sama seperti fungsi if yaitu untuk melakukan seleksi atas beberapa pilihan dengan kondisi sebagai syarat yang harus terpenuhi. Secara fungsi case dan if tidak ada perbedaan tetapi untuk penulisan fungsi case lebih mudah diterapkn untuk pilihan atau kondisi lebih dari satu.

Bentuk Umum fungsi Case OF
Case <variabel> of
<pilihan ke 1> ; hasil 1; <pilihan ke 2>; hasil2; <pilihan ke 3>;hasil3;
<pilihan ke n>; hasiln;
end;

atau fungsi case of bisa juga diberikan else untuk pilihan terakhir. Bentuk Umum
Case <variabel> of
<pilihan ke 1> ; hasil 1; <pilihan ke 2>; hasil2; <pilihan ke 3>;hasil3;
else hasiln;
end;

Contoh :
Case Bilangan of
1 : showmessage('Angka 1');
2: showmessage( 'Angka 2');
3: showmessage( 'Angka 3');
end;

Demikian sedikit penjelasan tentang fungsi Percabangan pada bahasa pemrograman Delphi dan semoga bermanfaat, jika ada pertanyaan bisa ditanyakan lewat kolom komentar. Untuk contoh percabangan pada insya Allah akan saya post pada postingan selanjutnya.

Terimakasih atas kunjungannya, Selamat belajar dan jangan mudah menyerah.

Wassalamu'alaikum Wr Wb

Comments