Menghitung Bilangan Faktorial dengan Perulangan Pada Delphi

Apa Kabar Nich??
Langsung Saja ya.. Kali ini saya Mau Sharing tentang cara Menghitung Bilangan Faktorial Menggunakan Coding Delphi. disini kita akan Memanfaatkan Fungsi Perulangan FOR. 
Pertama, Desain Form Anda Seperti dibawah ini :

Sedikit Info :
Yang dibutuhkan adalah...
2 Buah Edit
2 Buah Label
1 Buah Button
1 Buah Listbox

Kedua, Masukan Koding dibawah ini kedalam event onClik Pada Button (Anda Dapat Melakukannya dengan Klik dua Kali Pada Button)!!

procedure TForm3.Button1Click(Sender: TObject);
var
a,b,c,i : integer;
begin
a:=strtoint(edit1.Text);
b:=strtoint(edit2.Text);
for i := a to b do begin
c:=sqr(i);
listbox1.Items.Add(('Bilangan='+inttostr(i))+'>>> Faktorial='+inttostr(c))
end;

Hasilnya Seperti Ini :

Perulangan.rar">Download Projeknya disini!!