Ivan's Blog

Oke kali ini saya akan melanjutkan penjelasan mengenai bahasa pemrograman Delphi. Pada kesempatan kali ini saya akan menjelaskan Database pada Delphi dengan menghubungkan database pada Microsoft Access ke dalam program database VB, pada program ini saya menggunakan Delphi 7. B erikut adalah desain tampilan programnya : ADO Connection Ada Di Pallete ADO ADOTable Ada di Pallete ADO DataSource Ada di Pallete Data Acces DBNavigator Ada di Pallete Data Control DBGrid Ada di Pallete Data Control Pada desain form Latihan Database diatas terdapat 5 buah label yaitu Database 1IA16 2013/2014, NPM, NAMA, KELAS, dan ALAMAT. Selanjutnya, terdapat 4 buah Edit yang berfungsi sebagai tempat inputan user untuk mengetikan data, lalu ada 3 buah Button yang masing-masing memiliki fugsi yang berbeda yaitu button RESET untuk menghapus sisa data inputan yang telah diketikan user, SIMPAN untuk menyimpan data yang telah diketikan user, serta EXIT untuk keluar dari program.

Saya akan menambahakan satu contoh program perulangan yaitu program bintang '*' yang berbentuk Setengah Diamond / Setengah Wajik.  Berikut adalah desain tampilan programnya : Pada desain form1 diatas terdapat 3 buah label yaitu Perulangan Delphi, (SETENGAH DIAMOND), dan Masukkan Tinggi. Selanjutnya, terdapat sebuah Edit yang berfungsi sebagai tempat inputan user untuk mengetikan batas dari perulangan yang akan dijalankan, kemudian terdapat ListBox yang berfungsi sebagai tempat tampilnya output perulangan, lalu yang terakhir ada 3 buah Button yaitu Proses, Reset dan EXIT. Berikut adalah kode program / sintaks yang terdapat pada program tersebut : 1. Button1 (Proses) procedure TForm1.Button1Click(Sender: TObject); var a,b,c: integer; bintang : string; begin bintang := '*'; b := StrToInt (Edit1.Text); for a:= 0 to b do   begin   ListBox1.Items.Add (bintang);   bintang := bintang + '*';   end; for a:= b downto 0 do

Oke kali ini saya akan menjelaskan contoh program dengan kondisi perulangan pada delphi.  Delphi adalah bahasa pemrograman yang menggunakan visualisasi seperti bahasa pemrograman Visual Basic (VB), namun Delphi menggunakan bahasa yang hampir sama dengan Pascal (Object Pascal). Pada program ini saya menggunakan Delphi 7. Berikut adalah desain tampilan programnya : Pada desain form1 diatas terdapat 2 buah label yaitu Perulangan Delphi dan Masukkan Tinggi. Selanjutnya, terdapat sebuah Edit yang berfungsi sebagai tempat inputan user untuk mengetikan batas dari perulangan yang akan dijalankan, kemudian terdapat ListBox yang berfungsi sebagai tempat tampilnya output perulangan, lalu yang terakhir ada 3 buah Button yang masing-masing memiliki kondisi perulangan yang berbeda dan sebuah button Clear serta Exit. Berikut adalah kode program / sintaks yang terdapat pada program tersebut : procedure TForm1.Button1Click(Sender: TObject); var a,b:integer; begin b: