Membuat Aplikasi Delphi Dengan Fungsi QuickSort

Setelah selesai saya membuat tutorial "Membua Aplikasi Delphi Dengan Array" saatnya saya membuat tutorial aplikasi delphi dengan funsgi Quicksort

untuk membuat aplikasi sederhana ini kita masukkan komponen komponen seperti ini
1. 4 buah label
2. 3 buah button
3. 2 buah listbox
4. 1 buah edit text

setelah kita masukkan komponen diatas, sekarang kita harus mengaturnya seperti gambar yang saya beri dibawah ini

Setelah kita buat seperti form diatas, sekarang saatnya kita beri listing programnya, bisa dilihat seperti gambar dibawah ini

Setelah kita isi listing programnya, sekarang saatnya kita run programnya, dibawah adalah tampilan pertama saat program dijalankan

Untuk menggunakannya sekarang kita isi angka yang acak pada edit text dibawah Masukkan Nilai lalu kemudian kita isi nilai lalu klik tombol tambah, begitu seterusnya

disini saya, isi 5 angka yang acak.

Lalu setelah itu kita klik tombol proses dan pada listbox bagian Hasil, akan tampil angka yang tadinya acak akan menjadi terurut

Demikian tutorial saya kali ini, jika ada kesalahan mohon dimaafkan, jika ada yang ingin ditanyakan silahkan berkomentar dibawah ini

TERIMA KASIH