Menambahkan Kata atau Kalimat dalam Lines Memo Delphi

Komponen: 1. Dua Button (Tab Standard) 2. Memo (Tab Standard) Properties: 1. Ubah Caption pada Button1 menjadi “Contoh 1” dan Caption pada Button2 menjadi “Contoh 2“. Desain Form seperti gambar dibawah ini: Masukkan kode program berikut pada Button1: procedure TForm1.Button1Click(Sender: TObject); begin Memo1.Lines.Add(‘Contoh 1’); end; Dan masukkan kode program berikut pada Button2: procedure TForm1.Button2Click(Sender: TObject); begin Memo1.Lines.Add(‘Contoh 2’); end; […]

, , , , , , , ,

Tinggalkan komentar

Memilih dengan RadioButton pada Delphi

Desain Form seperti gambar dibawah ini: Komponen: 1. Label (Tab Standard) 2. Dua RadioButton (Tab Standard) Properties: 1. Ubah Caption pada Label menjadi “Jenis Kelamin“. 2. Ubah Caption pada RadioButton1 menjadi “Laki-laki” dan Caption pada RadioButton2 menjadi “Perempuan“. Kode Program: 1. Masukkan Kode Program berikut pada RadioButton1  procedure TForm1.RadioButton1Click(Sender: TObject); begin ShowMessage(‘Kamu memilih Laki-laki’); end; 2. Masukkan […]

, , , , , , ,

Tinggalkan komentar

Hitung Nilai V.1.0 Lite

Iseng-iseng buat aplikasi untuk menghitung nilai soal pilihan ganda. Hehe. Mungkin beberapa orang aplikasi ini bisa digunakan untuk mempermudah menghitung nilai dengan cepat. Aplikasi ini simple, hanya memasukkan “KUNCI JAWABAN” dan “JAWABAN” dari soal tersebut lalu akan terlihat hasil nya dan terlihat pula jawaban-jawaban pada nomer berapa yang terdapat jawaban salah dan benar. Dari gambarnya sudah […]

, , , , , ,

Tinggalkan komentar

SlowMotion Form Saat Tampil pada Delphi

Gunakan satu Timer (Tab System) dan satu Button (Tab Standard) lalu desain Form seperti gambar dibawah ini: Atur Properties pada Form. Ubah AlphaBlend menjadi True dan ubah AlphaBlendValue menjadi “O“. AlphaBlendValue adalah tingkat transparansi Form saat tampil. Ketika di ubah menjadi “O” maka tampilan Form tidak terlihat saat program dijalankan. Setelah itu atur Properties Interval […]

, , , , , , ,

Tinggalkan komentar

ShowMessage Sebagai Pesan pada Delphi

Gunakan 2 Button (Tab Standard) yaitu Button1 dan Button2. Ubah Properties Caption Button1 menjadi “Pesan 1” dan Button2 menjadi “Pesan 2“. Desain Form seperti gambar dibawah ini: Masukkan kode program pada Button1 dengan cara klik 2 kali: procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(‘Isi Pesan disini’); end; Dan masukkan kode program berikut pada Button2: procedure TForm1.Button2Click(Sender: TObject); […]

, , , , , , , ,

Tinggalkan komentar

Tambah dan Hapus Item pada ListBox Delphi

Komponen: 1. Edit (Tab Standard) 2. Button1 dan Button2 (Tab Standard) 3. ListBox (Tab Standard) Properties: 1. Edit1 (Hapus kata Edit1 pada Properties Text) 2. Button1 (Ubah Properties Caption menjadi “Tambahkan“) 3. Button2 (Ubah Properties Caption menjadi “Hapus“) Desain Form seperti gambar berikut: Masukkan kode program berikut pada Button1 (“Tambahkan“): procedure TForm1.Button1Click(Sender: TObject); begin ListBox1.Items.Add(Edit1.Text); […]

, , , , , , , ,

Tinggalkan komentar

ProgressBar pada Delphi

Desain Form seperti gambar dibawah ini, gunakan komponen ProgressBar (Tab Win32) dan Timer (Tab System). Lihat Properties pada ProgressBar, nilai default Properties Max = 100 yaitu panjang maksimal ProgressBar tersebut dan dapat diubah sesuai keinginan. Sedangkan Properties Orientation untuk mengatur ke arah mana ProgressBar berjalan (Horizontal atau Vertical). Kalau di ubah menjadi Vertikal berarti Desain […]

, , , , , , ,

Tinggalkan komentar