Syntax Percabangan pada Delphi

Percabangan atau kerennya disebut branching merupakan pernyataan yang mengharuskan kita untuk memilih benar satu dari beberapa option yang tersedia. Percabangan sering kita temui di kehidupan sehari-hari. Misalkan kalimat ini, "Kalau kamu duduk manis dan tidak rewel maka akan aku beri coklat Daily Milk :D" kalimat tersebut mensyaratkan suatu hal terpenuhi dulu, setelah itu pernyataan bisa dieksekusi *Sadiss_kata_Afgan* . Pasti bingung ya dengan penjelasan barusan. :D

Ok. Singkatnya Percabangan adalah suatu keadaan dimana pernyataan dapat dieksekusi apabila suatu kondisi memenuhi syarat untuk mengerjakan pernyataan tersebut. Percabangan if merupakan percabangan yang melibatkan lebih dari satu kondisi dam penggabungan beberapa if dan bisa juga digabungkan menjadi if-else. Percabangan sering kita temui menggunakan label if/else, switch. Pada kesempatan kali ini, saya akan memberikan contoh percabangan dengan menggunakan perintah "If"

Complete the following syntax ! *iseng.co.id*
____________________________________

procedure TForm1.Button1Click(Sender: TObject);
begin
if edit1.Text='______' then

begin
edit2.Text:='Ucapkan أَللَّهُمَّ صَيِّباً نَافِعاً.';
edit3.text:='Ya AllAh jadikanlah hujan yang turun ini lebat dan membawa manfaat.';
end

else
begin
showmessage('Air hujan yang mengalir adalah suatu karunia .:: al Khottobi ::.');
end;

end.

At last but not the last .. cerita tentang cinta segitiga juga merupakan satu kasus percabangan loh.. Hahaha *Kabur sebelum 

.::  The answer is "Rainy"  ::.