Percabangan pada Delphi

at Rabu, Agustus 26, 2015

Percabangan pada Delphi haruslah kita pahami dan kuasai karena ini merupakan kata kunci dalam pembuatan program. Meskipun terlihat sederhana, tapi ini merupakan dasar logika yang harus kita kuasai dan pahami. Karena dalam program yang rumit pasti didalamnya terdapat percabangan. Percabangan yang kita bahas kali ini adalah If-Else dan Case-Of. Tapi sebelum mencobanya, sebaiknya kita sudah menguasai Penggunaan Button dan Edit pada Delphi

Ini merupakan script pada Button

var
a,b,d:integer;
c,e:string;
begin
a:=strtoint(edit1.text);
b:=strtoint(edit2.text);
if b >= a then c:=’lulus’
else c:=’tidak lulus’;
edit3.Text:=c;
if b<= 50 then d:=1; if b>= 60 then d:=2;
if b>= 70 then d:=3;
if b>= 80 then d:=4;
if b>= 90 then d:=5;
case d of
1:e:=’E';
2:e:=’D';
3:e:=’C';
4:e:=’B';
5:e:=’A';
end;
edit4.text:=e;
end;

Video Percabangan pada Delphi ini tentunya menjelaskan kepada kita cara membuat sebuah program menggunakan percabangan. Tutorial video juga menggunakan screen recorder sehingga mudah untuk dimengerti dan dapat langsung dipraktikan.

Demikian artikel dan video Percabangan pada Delphi. Selamat mencoba dan langsung mempraktikannya. Semoga tutorial ini dapat bermanfaat bagi anda. Langsung bagikan artikel ini kepada teman anda di social media dengan klik tombol share on di bawah dan jangan lupa berikan komentar anda :)