//
archives

Delphi

This category contains 2 posts

Bermain Data dengan String Grid


Tulisan ini dibuat sebagai pembahasan dari kuis yang saya berikan pada praktikum mata kuliah Pemrograman Visual. Sebagai referensi dan juga karena janji saya kepada mahasiswa/i di kelas, maka dengan sedikit menyita waktu dan pikiran akhirnya saya relakan untuk membuatnya (becanda yaa..:D). Oke mulai aja deh.

Pertama, seperti biasa kita buat aplikasi baru. File > New Application. Lalu masukkan komponen yang diperlukan seperti gambar di bawah ini. Langsung masuk koding aja nih. Pada btnSimpan masukkan kode berikut.

source-code

Untuk penamaan Properties > Name disesuaikan saja. Saya pikir teman-teman udah pada jago.

Jangan lupa untuk membuat variabel p sebagai variabel global dan juga buatlah kode berikut pada event FormCreate.

source-code

Selanjutnya ini adalah skrip untuk btnClear.

source-code

Selesai. Jalankan program dengan menekan tombol F9.

Catatan: Mengenai validasi yang saya perintahkan sengaja tidak saya buat, karena teman-teman pasti udah pada bisa. OK!

Program jadinya bisa didownload disini.

Terima Kasih.

Tutorial Delphi: Membuat Program Matriks Transpost


Tutorial ini dibuat sebagai pengganti Praktikum Pemrograman Visual untuk mahasiswa Pendidikan Ilmu Komputer kelas B. Saya buatkan sedikit tutorial singkat mengenai pembuatan Matriks Transpost di Delphi. Ok, Let’s Begin!

Pertama, bukalah Program Delphi, lalu buat Project Baru dengan cara File > New > Application.

Delphi Interface

Delphi Interface

Lalu kita ubah Properties form ini menjadi:

Properties

Value

Caption Program Matriks Transpost
Color clSkyBlue
Font Name Segoe UI
Font Size 10
Position poDesktopCenter

Kedua, buatlah beberapa komponen pada Form Design sehingga seperti tampilan berikut.

Form Design - Workspace

Form Design - Workspace

Keterangan:

  • Gunakan 3 label, 2 ComboBox, 1 BitButton, 1 Button, dan 2 StringGrid.
  • Beri Properties > Name dari ComboBox yaitu, cmbBaris dan cmbKolom, BitButton dengan name btnOk, Button dengan name btnTranspost, dan StringGrid dengan name stringMatriks dan stringTemp.
  • Isikan Properties > Items dari cmbBaris dan cmbKolom dengan angka 2,3,4,5, serta ganti Properties > Style menjadi csDropDownList.
  • Pada btnTranspost dan stringMatriks berikan nilai False pada Properties > Visible.
  • Pada stringTemp juga buatlah Properties > Visible menjadi False dan letakan dimana saja, lalu perkecil jendela sehingga tampak pada gambar di atas.

Ketiga, double-click btnOk, lalu isikan kode berikut.

source code

Double-click pula btnTranspost, lalu isikan kode berikut.

source-code

Selesai. Lalu jalankan program dengan tekan F9.

Konsepnya dalam kasus ini adalah bagaimana kita dapat memindahkan sebuah nilai dari satu tempat ke tempat lainnya. Disini digunakan stringTemp untuk menyimpan nilai dari Matriks sebelum di-transpost-kan. Kita bisa gunakan juga tipe data array 2 dimensi untuk menyimpan nilai sementara itu, sehingga tak perlu kita gunakan 2 buah StringGrid.

Mudah kan….?!

Untuk materi dan program jadinya bisa diunduh disini.

%d blogger menyukai ini: